Mercurial > emacs

changeset 64586:675c97656ccc

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(define-minor-mode): Never call the mode function using `eval-after-load'.
author Luc Teirlinck <teirllm@auburn.edu>
date Fri, 22 Jul 2005 01:26:03 +0000
parents 0cfba34a7bd3
children e35a761796a9
files lisp/emacs-lisp/easy-mmode.el
diffstat 1 files changed, 1 insertions(+), 6 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/emacs-lisp/easy-mmode.el	Fri Jul 22 01:22:49 2005 +0000
+++ b/lisp/emacs-lisp/easy-mmode.el	Fri Jul 22 01:26:03 2005 +0000
@@ -267,12 +267,7 @@
        (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)))))))
 
 ;;;
 ;;; make global minor mode