# HG changeset patch # User Richard M. Stallman # Date 1085844890 0 # Node ID 2fe67fa04b1afc4069897184232ce909ad398948 # Parent fcd2e17daffaa1c8c957543ed7b4d61313823963 (browse-url-interactive-arg): Doc fix. diff -r fcd2e17daffa -r 2fe67fa04b1a lisp/net/browse-url.el --- a/lisp/net/browse-url.el Sat May 29 15:33:30 2004 +0000 +++ b/lisp/net/browse-url.el Sat May 29 15:34:50 2004 +0000 @@ -578,11 +578,12 @@ (defun browse-url-interactive-arg (prompt) "Read a URL from the minibuffer, prompting with PROMPT. If `transient-mark-mode' is non-nil and the mark is active, -defaults to the current region, else to the URL at or before -point. If invoked with a mouse button, set point to the -position clicked first. Return a list for use in `interactive' -containing the URL and `browse-url-new-window-flag' or its -negation if a prefix argument was given." +it defaults to the current region, else to the URL at or before +point. If invoked with a mouse button, it moves point to the +position clicked before acting. + +This function returns a list (URL NEW-WINDOW-FLAG) +for use in `interactive'." (let ((event (elt (this-command-keys) 0))) (and (listp event) (mouse-set-point event))) (list (read-string prompt (or (and transient-mark-mode mark-active