diff options
| author | Richard M. Stallman | 1994-01-29 23:58:07 +0000 |
|---|---|---|
| committer | Richard M. Stallman | 1994-01-29 23:58:07 +0000 |
| commit | 8f22b9e08eb5e4323ea149a2e408ff720935fd1b (patch) | |
| tree | 18f47036dbbdbf17ad9c51dc1d201777dcad040c | |
| parent | 1de48e7f1f95cb54d3981ecd1087a8bb5982004e (diff) | |
| download | emacs-8f22b9e08eb5e4323ea149a2e408ff720935fd1b.tar.gz emacs-8f22b9e08eb5e4323ea149a2e408ff720935fd1b.zip | |
(minor-mode-alist): Don't add "Outl" if already added.
| -rw-r--r-- | lisp/textmodes/ooutline.el | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/lisp/textmodes/ooutline.el b/lisp/textmodes/ooutline.el index 4f891e125eb..c3f05af00bb 100644 --- a/lisp/textmodes/ooutline.el +++ b/lisp/textmodes/ooutline.el | |||
| @@ -101,8 +101,9 @@ in the file it applies to.") | |||
| 101 | "Non-nil if using Outline mode as a minor mode of some other mode.") | 101 | "Non-nil if using Outline mode as a minor mode of some other mode.") |
| 102 | (make-variable-buffer-local 'outline-minor-mode) | 102 | (make-variable-buffer-local 'outline-minor-mode) |
| 103 | (put 'outline-minor-mode 'permanent-local t) | 103 | (put 'outline-minor-mode 'permanent-local t) |
| 104 | (setq minor-mode-alist (append minor-mode-alist | 104 | (or (assq 'outline-minor-mode minor-mode-alist) |
| 105 | (list '(outline-minor-mode " Outl")))) | 105 | (setq minor-mode-alist (append minor-mode-alist |
| 106 | (list '(outline-minor-mode " Outl"))))) | ||
| 106 | 107 | ||
| 107 | ;;;###autoload | 108 | ;;;###autoload |
| 108 | (defun outline-mode () | 109 | (defun outline-mode () |