1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2026-01-11 05:51:21 -08:00

(outline-minor-mode-prefix): New variable.

(outline-minor-mode-map): Use it.
This commit is contained in:
Richard M. Stallman 1993-08-14 09:08:50 +00:00
parent 1e068e8fbf
commit 6e301d2449

View file

@ -164,13 +164,16 @@ Turning on outline mode calls the value of `text-mode-hook' and then of
outline-regexp "\\)"))
(run-hooks 'text-mode-hook 'outline-mode-hook))
(defvar outline-minor-mode-prefix "\C-c"
"*Prefix key to use for Outline commands in Outline minor mode.")
(defvar outline-minor-mode-map nil)
(if outline-minor-mode-map
nil
(setq outline-minor-mode-map (make-sparse-keymap))
(define-key outline-minor-mode-map [menu-bar]
(lookup-key outline-mode-map [menu-bar]))
(define-key outline-minor-mode-map "\C-c"
(define-key outline-minor-mode-map outline-minor-mode-prefix
(lookup-key outline-mode-map "\C-c")))
(or (assq 'outline-minor-mode minor-mode-map-alist)