Mercurial > emacs
comparison lisp/net/browse-url.el @ 43416:e1ebc8ff2a53
(browse-url-maybe-new-window): Reverse the sense of the comparison,
to match the doc strings of functions that use this macro.
| author | Eli Zaretskii <eliz@gnu.org> |
|---|---|
| date | Tue, 19 Feb 2002 11:14:40 +0000 |
| parents | 8ecfd38df30d |
| children | 21f583da1eac |
comparison
equal
deleted
inserted
replaced
| 43415:59c97b8695ee | 43416:e1ebc8ff2a53 |
|---|---|
| 555 (null current-prefix-arg))))) | 555 (null current-prefix-arg))))) |
| 556 | 556 |
| 557 ;; interactive-p needs to be called at a function's top-level, hence | 557 ;; interactive-p needs to be called at a function's top-level, hence |
| 558 ;; the macro. | 558 ;; the macro. |
| 559 (defmacro browse-url-maybe-new-window (arg) | 559 (defmacro browse-url-maybe-new-window (arg) |
| 560 `(if (interactive-p) | 560 `(if (not (interactive-p)) |
| 561 ,arg | 561 ,arg |
| 562 browse-url-new-window-flag)) | 562 browse-url-new-window-flag)) |
| 563 | 563 |
| 564 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; | 564 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; |
| 565 ;; Browse current buffer | 565 ;; Browse current buffer |