diff options
| -rw-r--r-- | lisp/emacs-lisp/easy-mmode.el | 7 |
1 files changed, 1 insertions, 6 deletions
diff --git a/lisp/emacs-lisp/easy-mmode.el b/lisp/emacs-lisp/easy-mmode.el index 87f3e7249aa..09abd272e53 100644 --- a/lisp/emacs-lisp/easy-mmode.el +++ b/lisp/emacs-lisp/easy-mmode.el | |||
| @@ -267,12 +267,7 @@ With zero or negative ARG turn mode off. | |||
| 267 | (add-minor-mode ',mode ',lighter | 267 | (add-minor-mode ',mode ',lighter |
| 268 | ,(if keymap keymap-sym | 268 | ,(if keymap keymap-sym |
| 269 | `(if (boundp ',keymap-sym) | 269 | `(if (boundp ',keymap-sym) |
| 270 | (symbol-value ',keymap-sym)))) | 270 | (symbol-value ',keymap-sym))))))) |
| 271 | |||
| 272 | ;; If the mode is global, call the function according to the default. | ||
| 273 | ,(if globalp | ||
| 274 | `(if (and load-file-name (not (equal ,init-value ,mode))) | ||
| 275 | (eval-after-load load-file-name '(,mode (if ,mode 1 -1)))))))) | ||
| 276 | 271 | ||
| 277 | ;;; | 272 | ;;; |
| 278 | ;;; make global minor mode | 273 | ;;; make global minor mode |