Mercurial > emacs

diff lisp/net/browse-url.el @ 105371:0769a73f1d18

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
* 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 d04b8967407b
children bd2966850aac
line wrap: on
line diff
--- a/lisp/net/browse-url.el	Thu Oct 01 23:42:39 2009 +0000
+++ b/lisp/net/browse-url.el	Fri Oct 02 00:02:02 2009 +0000
@@ -669,7 +669,7 @@
 ;; this macro.  We use that rather than interactive-p because
 ;; use in a keyboard macro should not change this behavior.
 (defmacro browse-url-maybe-new-window (arg)
-  `(if (or noninteractive (not (called-interactively-p)))
+  `(if (or noninteractive (not (called-interactively-p 'any)))
        ,arg
      browse-url-new-window-flag))