]> git.eshelyaron.com Git - emacs.git/commitdiff
Make Customize changes to outline-minor-mode-prefix happen immediately
authorPhilip K <philip@warpmail.net>
Sat, 8 Aug 2020 11:52:46 +0000 (13:52 +0200)
committerLars Ingebrigtsen <larsi@gnus.org>
Sat, 8 Aug 2020 11:52:46 +0000 (13:52 +0200)
* lisp/outline.el (outline-minor-mode-prefix): Update the key map
after changing the value in Customize (bug#41073).

lisp/outline.el

index 28ea8a86e6f6eb375f48ef11cf18b448458b6906..d2a5d42d74ae1dd643ae24c82080c47a17ef2450 100644 (file)
@@ -289,12 +289,18 @@ Turning on outline mode calls the value of `text-mode-hook' and then of
        (list (list nil (concat "^\\(?:" outline-regexp "\\).*$") 0)))
   (add-hook 'change-major-mode-hook 'outline-show-all nil t))
 
+(defvar outline-minor-mode-map)
+
 (defcustom outline-minor-mode-prefix "\C-c@"
   "Prefix key to use for Outline commands in Outline minor mode.
 The value of this variable is checked as part of loading Outline mode.
 After that, changing the prefix key requires manipulating keymaps."
   :type 'string
-  :group 'outlines)
+  :group 'outlines
+  :set (lambda (sym val)
+         (define-key outline-minor-mode-map outline-minor-mode-prefix nil)
+         (define-key outline-minor-mode-map val outline-mode-prefix-map)
+         (set-default sym val)))
 
 ;;;###autoload
 (define-minor-mode outline-minor-mode