diff options
| author | Stefan Monnier | 2000-11-03 04:38:41 +0000 |
|---|---|---|
| committer | Stefan Monnier | 2000-11-03 04:38:41 +0000 |
| commit | 34befa9a5b37f2ac2150c637a9e7c88d5ddd9bb1 (patch) | |
| tree | 7d02e6f168cb4e044fe25f72bfc3bd4e1347c51e | |
| parent | ba22aeff64e22ce7991f45086b36c45ef3e2324d (diff) | |
| download | emacs-34befa9a5b37f2ac2150c637a9e7c88d5ddd9bb1.tar.gz emacs-34befa9a5b37f2ac2150c637a9e7c88d5ddd9bb1.zip | |
(easy-mmode-define-global-mode): Only turn mode off if it's on.
| -rw-r--r-- | lisp/emacs-lisp/easy-mmode.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/emacs-lisp/easy-mmode.el b/lisp/emacs-lisp/easy-mmode.el index 4d6897fc1d5..00a941c81b9 100644 --- a/lisp/emacs-lisp/easy-mmode.el +++ b/lisp/emacs-lisp/easy-mmode.el | |||
| @@ -270,7 +270,7 @@ in which `%s' turns it on." | |||
| 270 | ;; Go through existing buffers. | 270 | ;; Go through existing buffers. |
| 271 | (dolist (buf (buffer-list)) | 271 | (dolist (buf (buffer-list)) |
| 272 | (with-current-buffer buf | 272 | (with-current-buffer buf |
| 273 | (if ,global-mode (,turn-on) (,mode -1))))) | 273 | (if ,global-mode (,turn-on) (when ,mode (,mode -1)))))) |
| 274 | 274 | ||
| 275 | ;; Autoloading easy-mmode-define-global-mode | 275 | ;; Autoloading easy-mmode-define-global-mode |
| 276 | ;; autoloads everything up-to-here. | 276 | ;; autoloads everything up-to-here. |