Mercurial > emacs
changeset 5693:e54c2697692b
(minor-mode-alist): Don't add "Outl" if already added.
| author | Richard M. Stallman <rms@gnu.org> |
|---|---|
| date | Sat, 29 Jan 1994 23:58:07 +0000 |
| parents | bb9b20ea092d |
| children | 69471d331d0c |
| files | lisp/textmodes/ooutline.el |
| diffstat | 1 files changed, 3 insertions(+), 2 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/textmodes/ooutline.el Sat Jan 29 23:56:27 1994 +0000 +++ b/lisp/textmodes/ooutline.el Sat Jan 29 23:58:07 1994 +0000 @@ -101,8 +101,9 @@ "Non-nil if using Outline mode as a minor mode of some other mode.") (make-variable-buffer-local 'outline-minor-mode) (put 'outline-minor-mode 'permanent-local t) -(setq minor-mode-alist (append minor-mode-alist - (list '(outline-minor-mode " Outl")))) +(or (assq 'outline-minor-mode minor-mode-alist) + (setq minor-mode-alist (append minor-mode-alist + (list '(outline-minor-mode " Outl"))))) ;;;###autoload (defun outline-mode ()