[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] Changes to emacs/lisp/net/browse-url.el
From: |
Richard M . Stallman |
Subject: |
[Emacs-diffs] Changes to emacs/lisp/net/browse-url.el |
Date: |
Thu, 04 Nov 2004 05:21:13 -0500 |
Index: emacs/lisp/net/browse-url.el
diff -c emacs/lisp/net/browse-url.el:1.38 emacs/lisp/net/browse-url.el:1.39
*** emacs/lisp/net/browse-url.el:1.38 Sat May 29 15:34:50 2004
--- emacs/lisp/net/browse-url.el Thu Nov 4 10:15:37 2004
***************
*** 596,605 ****
(not (eq (null browse-url-new-window-flag)
(null current-prefix-arg)))))
! ;; interactive-p needs to be called at a function's top-level, hence
! ;; the macro.
(defmacro browse-url-maybe-new-window (arg)
! `(if (not (interactive-p))
,arg
browse-url-new-window-flag))
--- 596,606 ----
(not (eq (null browse-url-new-window-flag)
(null current-prefix-arg)))))
! ;; called-interactive-p needs to be called at a function's top-level, hence
! ;; 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)))
,arg
browse-url-new-window-flag))
- [Emacs-diffs] Changes to emacs/lisp/net/browse-url.el,
Richard M . Stallman <=