diff lisp/image-mode.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 aab85e9d78b6
children a0f778f4a995
line wrap: on
line diff
--- a/lisp/image-mode.el	Thu Oct 01 23:42:39 2009 +0000
+++ b/lisp/image-mode.el	Fri Oct 02 00:02:02 2009 +0000
@@ -429,7 +429,7 @@
 	(setq image-type "text")
 	(if (eq major-mode 'image-mode)
 	    (setq mode-name "Image[text]"))
-	(if (called-interactively-p)
+	(if (called-interactively-p 'any)
 	    (message "Repeat this command to go back to displaying the image")))
     ;; Turn the image data into a real image, but only if the whole file
     ;; was inserted
@@ -472,7 +472,7 @@
       (setq image-type type)
       (if (eq major-mode 'image-mode)
 	  (setq mode-name (format "Image[%s]" type)))
-      (if (called-interactively-p)
+      (if (called-interactively-p 'any)
 	  (message "Repeat this command to go back to displaying the file as text")))))
 
 ;;; Support for bookmark.el