diff options
| author | Richard M. Stallman <rms@gnu.org> | 2004-11-02 09:23:34 +0000 |
|---|---|---|
| committer | Richard M. Stallman <rms@gnu.org> | 2004-11-02 09:23:34 +0000 |
| commit | a27235b3b5a9a6a31a8f33410186bd35328531e2 (patch) | |
| tree | c4cc581fc58fc13d75b0c4ae9370a22ff9ca245c /lisp/emacs-lisp/easy-mmode.el | |
| parent | 086af77cf525ef51c8f15ef2b1c3673c86eea5ff (diff) | |
| download | emacs-a27235b3b5a9a6a31a8f33410186bd35328531e2.tar.gz | |
(define-minor-mode): Use called-interactively-p.
Diffstat (limited to 'lisp/emacs-lisp/easy-mmode.el')
| -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 2439fdd4de6..b6b91710ed4 100644 --- a/lisp/emacs-lisp/easy-mmode.el +++ b/lisp/emacs-lisp/easy-mmode.el @@ -209,7 +209,7 @@ With zero or negative ARG turn mode off. ,@body ;; The on/off hooks are here for backward compatibility only. (run-hooks ',hook (if ,mode ',hook-on ',hook-off)) - (if (interactive-p) + (if (called-interactively-p) (progn ,(if globalp `(customize-mark-as-set ',mode)) (unless (current-message) |