From: Eli Zaretskii <eliz@gnu.org>
Date: Sun, 1 Apr 2018 09:09:54 +0000 (+0300)
Subject: * lisp/net/shr.el (shr-browse-url): Doc fix.  (Bug#30957)
X-Git-Tag: emacs-26.1-rc1~27
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=af1624f;p=emacs.git

* lisp/net/shr.el (shr-browse-url): Doc fix.  (Bug#30957)
---

diff --git a/lisp/net/shr.el b/lisp/net/shr.el
index a6b8693dd74..5582e29c526 100644
--- a/lisp/net/shr.el
+++ b/lisp/net/shr.el
@@ -934,8 +934,12 @@ size, and full-buffer size."
   (shr-browse-url))
 
 (defun shr-browse-url (&optional external mouse-event)
-  "Browse the URL under point.
-If EXTERNAL, browse the URL using `shr-external-browser'."
+  "Browse the URL at point using `browse-url'.
+If EXTERNAL is non-nil (interactively, the prefix argument), browse
+the URL using `shr-external-browser'.
+If this function is invoked by a mouse click, it will browse the URL
+at the position of the click.  Optional argument MOUSE-EVENT describes
+the mouse click event."
   (interactive (list current-prefix-arg last-nonmenu-event))
   (mouse-set-point mouse-event)
   (let ((url (get-text-property (point) 'shr-url)))