From af1624f29bc264fe0cff31c46b25b0b0c90e24bf Mon Sep 17 00:00:00 2001 From: Eli Zaretskii Date: Sun, 1 Apr 2018 12:09:54 +0300 Subject: [PATCH] * lisp/net/shr.el (shr-browse-url): Doc fix. (Bug#30957) --- lisp/net/shr.el | 8 ++++++-- 1 file changed, 6 insertions(+), 2 deletions(-) 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))) -- 2.11.4.GIT