Mercurial > emacs
changeset 4622:a55b9c08e4af
(outline-minor-mode-prefix): New variable.
(outline-minor-mode-map): Use it.
| author | Richard M. Stallman <rms@gnu.org> |
|---|---|
| date | Sat, 14 Aug 1993 09:08:50 +0000 |
| parents | 859d97b0f5bd |
| children | 3c1c4e9a4464 |
| files | lisp/textmodes/ooutline.el |
| diffstat | 1 files changed, 4 insertions(+), 1 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/textmodes/ooutline.el Sat Aug 14 08:39:25 1993 +0000 +++ b/lisp/textmodes/ooutline.el Sat Aug 14 09:08:50 1993 +0000 @@ -164,13 +164,16 @@ 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)