diff options
| author | Richard M. Stallman <[email protected]> | 1993-08-14 09:08:50 +0000 |
|---|---|---|
| committer | Richard M. Stallman <[email protected]> | 1993-08-14 09:08:50 +0000 |
| commit | 6e301d2449a38b657cf3f93bbed7c1bd0fc774bf (patch) | |
| tree | 5e1d1ff62775d038753d6546844202dd297e1221 /lisp/textmodes/ooutline.el | |
| parent | 1e068e8fbf5eeec0a26b8471969dc186f55ffcb9 (diff) | |
(outline-minor-mode-prefix): New variable.
(outline-minor-mode-map): Use it.
Diffstat (limited to 'lisp/textmodes/ooutline.el')
| -rw-r--r-- | lisp/textmodes/ooutline.el | 5 |
1 files changed, 4 insertions, 1 deletions
diff --git a/lisp/textmodes/ooutline.el b/lisp/textmodes/ooutline.el index 006ab6ecdb..c0c478cc17 100644 --- a/lisp/textmodes/ooutline.el +++ b/lisp/textmodes/ooutline.el @@ -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) |