diff lisp/emacs-lisp/easy-mmode.el @ 105371:0769a73f1d18

* image-mode.el (image-toggle-display): * emacs-lisp/elp.el (elp-instrument-function): * emacs-lisp/advice.el (ad-make-advised-definition): * emacs-lisp/easy-mmode.el (define-minor-mode): * net/browse-url.el (browse-url-maybe-new-window): * progmodes/sh-script.el (sh-learn-buffer-indent): Pass new argument 'any to `called-interactively-p'.
author Juanma Barranquero <lekktu@gmail.com>
date Fri, 02 Oct 2009 00:02:02 +0000
parents ad1f780103d9
children bd2966850aac
line wrap: on
line diff
--- a/lisp/emacs-lisp/easy-mmode.el	Thu Oct 01 23:42:39 2009 +0000
+++ b/lisp/emacs-lisp/easy-mmode.el	Fri Oct 02 00:02:02 2009 +0000
@@ -234,7 +234,7 @@
            ,@body
            ;; The on/off hooks are here for backward compatibility only.
            (run-hooks ',hook (if ,mode ',hook-on ',hook-off))
-           (if (called-interactively-p)
+           (if (called-interactively-p 'any)
                (progn
                  ,(if globalp `(customize-mark-as-set ',mode))
                  ;; Avoid overwriting a message shown by the body,