Mercurial > emacs
comparison lisp/net/browse-url.el @ 45943:b699a283b3fa
(browse-url-at-mouse): Don't pass an arg to browse-url-at-point.
| author | Richard M. Stallman <rms@gnu.org> |
|---|---|
| date | Fri, 21 Jun 2002 09:58:32 +0000 |
| parents | f631e828090d |
| children | eb33dc994d58 |
comparison
equal
deleted
inserted
replaced
| 45942:bcb77f40c06e | 45943:b699a283b3fa |
|---|---|
| 701 `browse-url'. Variable `browse-url-browser-function' says which browser | 701 `browse-url'. Variable `browse-url-browser-function' says which browser |
| 702 to use." | 702 to use." |
| 703 (interactive "e") | 703 (interactive "e") |
| 704 (save-excursion | 704 (save-excursion |
| 705 (mouse-set-point event) | 705 (mouse-set-point event) |
| 706 (browse-url-at-point browse-url-new-window-flag))) | 706 ;; This handles browse-url-new-window-flag properly |
| 707 ;; when it gets no arg. | |
| 708 (browse-url-at-point))) | |
| 707 | 709 |
| 708 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; | 710 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; |
| 709 ;; Browser-specific commands | 711 ;; Browser-specific commands |
| 710 | 712 |
| 711 ;; --- Default MS-Windows browser --- | 713 ;; --- Default MS-Windows browser --- |