; Fix mistake in defvar-keymap conversion

A mix of `keymap-set` and `define-key` confused the automated
conversion.  Problem reported by Juri Linkov <juri@linkov.net>.

(cherry picked from commit 99d034cfd3fd807570b14a56413fc61e2c964c65)

diff --git a/lisp/outline.el b/lisp/outline.el
index bebe498d76b92a6d4aa27665ba8f32b10c3f053e..461a41d09e655eff35afe9391aa981b5893f8957 100644 (file)
--- a/lisp/outline.el
+++ b/lisp/outline.el
@@ -74,30 +74,30 @@ appropriately.  When the argument LOOKING-AT is non-nil, it should
 imitate the function `looking-at'.")
 
 (defvar-keymap outline-mode-prefix-map
-  "@"       #'outline-mark-subtree
-  "C-n"     #'outline-next-visible-heading
-  "C-p"     #'outline-previous-visible-heading
-  "C-i"     #'outline-show-children
-  "C-s"     #'outline-show-subtree
-  "C-d"     #'outline-hide-subtree
-  "C-u"     #'outline-up-heading
-  "C-f"     #'outline-forward-same-level
-  "C-b"     #'outline-backward-same-level
-  "C-t"     #'outline-hide-body
-  "C-a"     #'outline-show-all
-  "C-c"     #'outline-hide-entry
-  "C-e"     #'outline-show-entry
-  "C-l"     #'outline-hide-leaves
-  "C-k"     #'outline-show-branches
-  "C-q"     #'outline-hide-sublevels
-  "C-o"     #'outline-hide-other
-  "C-^"     #'outline-move-subtree-up
-  "C-v"     #'outline-move-subtree-down
-  "/ SPC s" #'outline-show-by-heading-regexp
-  "/ SPC h" #'outline-hide-by-heading-regexp
-  "C-<"     #'outline-promote
-  "C->"     #'outline-demote
-  "RET"     #'outline-insert-heading)
+  "@"   #'outline-mark-subtree
+  "C-n" #'outline-next-visible-heading
+  "C-p" #'outline-previous-visible-heading
+  "C-i" #'outline-show-children
+  "C-s" #'outline-show-subtree
+  "C-d" #'outline-hide-subtree
+  "C-u" #'outline-up-heading
+  "C-f" #'outline-forward-same-level
+  "C-b" #'outline-backward-same-level
+  "C-t" #'outline-hide-body
+  "C-a" #'outline-show-all
+  "C-c" #'outline-hide-entry
+  "C-e" #'outline-show-entry
+  "C-l" #'outline-hide-leaves
+  "C-k" #'outline-show-branches
+  "C-q" #'outline-hide-sublevels
+  "C-o" #'outline-hide-other
+  "C-^" #'outline-move-subtree-up
+  "C-v" #'outline-move-subtree-down
+  "/ s" #'outline-show-by-heading-regexp
+  "/ h" #'outline-hide-by-heading-regexp
+  "C-<" #'outline-promote
+  "C->" #'outline-demote
+  "RET" #'outline-insert-heading)
 
 (defvar outline-mode-menu-bar-map
   (let ((map (make-sparse-keymap)))