]> git.eshelyaron.com Git - emacs.git/commitdiff
(define-minor-mode): Never call the mode function using `eval-after-load'.
authorLuc Teirlinck <teirllm@auburn.edu>
Fri, 22 Jul 2005 01:26:03 +0000 (01:26 +0000)
committerLuc Teirlinck <teirllm@auburn.edu>
Fri, 22 Jul 2005 01:26:03 +0000 (01:26 +0000)
lisp/emacs-lisp/easy-mmode.el

index 87f3e7249aa4c3f927b1601ec9ed6ecb8e3ff3b8..09abd272e5318c8c28bcd695faf9cf190a79accb 100644 (file)
@@ -267,12 +267,7 @@ With zero or negative ARG turn mode off.
        (add-minor-mode ',mode ',lighter
                       ,(if keymap keymap-sym
                          `(if (boundp ',keymap-sym)
-                              (symbol-value ',keymap-sym))))
-
-       ;; If the mode is global, call the function according to the default.
-       ,(if globalp
-           `(if (and load-file-name (not (equal ,init-value ,mode)))
-                (eval-after-load load-file-name '(,mode (if ,mode 1 -1))))))))
+                              (symbol-value ',keymap-sym)))))))
 \f
 ;;;
 ;;; make global minor mode