Mercurial > emacs

comparison lisp/emacs-lisp/easy-mmode.el @ 49598:0d8b17d428b5

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Trailing whitepace deleted.
author Juanma Barranquero <lekktu@gmail.com>
date Tue, 04 Feb 2003 13:24:35 +0000
parents e0689be193e2
children 7e4e15b857f3 d7ddb3e565de
comparison
equal deleted inserted replaced
49597:e88404e8f2cf 49598:0d8b17d428b5
226 226
227 (add-minor-mode ',mode ',lighter 227 (add-minor-mode ',mode ',lighter
228 ,(if keymap keymap-sym 228 ,(if keymap keymap-sym
229 `(if (boundp ',keymap-sym) 229 `(if (boundp ',keymap-sym)
230 (symbol-value ',keymap-sym)))) 230 (symbol-value ',keymap-sym))))
231 231
232 ;; If the mode is global, call the function according to the default. 232 ;; If the mode is global, call the function according to the default.
233 ,(if globalp 233 ,(if globalp
234 `(if (and load-file-name (not (equal ,init-value ,mode))) 234 `(if (and load-file-name (not (equal ,init-value ,mode)))
235 (eval-after-load load-file-name '(,mode (if ,mode 1 -1)))))))) 235 (eval-after-load load-file-name '(,mode (if ,mode 1 -1))))))))
236 236