From 657962fc48b822102fa587d9d9b8db4ca701b876 Mon Sep 17 00:00:00 2001 From: "Richard M. Stallman" Date: Sat, 29 May 2004 15:34:50 +0000 Subject: [PATCH] (browse-url-interactive-arg): Doc fix. --- lisp/net/browse-url.el | 11 ++++++----- 1 file changed, 6 insertions(+), 5 deletions(-) diff --git a/lisp/net/browse-url.el b/lisp/net/browse-url.el index e98b3d815ab..1dbd97f0073 100644 --- a/lisp/net/browse-url.el +++ b/lisp/net/browse-url.el @@ -578,11 +578,12 @@ down (this *won't* always work)." (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