aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorBasil L. Contovounesios2019-08-02 16:39:53 +0300
committerBasil L. Contovounesios2019-08-02 16:42:38 +0300
commit695fbcf56db5a4336865e64b6d076008c62ce2ef (patch)
tree610a59ae252734187dd0c1f4f29ebe45624270fb
parent558038ccb76614d60bf54cb62359027d25e00f72 (diff)
downloademacs-695fbcf56db5a4336865e64b6d076008c62ce2ef.tar.gz
emacs-695fbcf56db5a4336865e64b6d076008c62ce2ef.zip
; Docfixes for recent browse-url.el additions
* lisp/net/browse-url.el (browse-url-secondary-browser-function) (browse-url-button-copy): Fix punctuation in and clarify docstrings.
-rw-r--r--lisp/net/browse-url.el10
1 files changed, 5 insertions, 5 deletions
diff --git a/lisp/net/browse-url.el b/lisp/net/browse-url.el
index 6382e66f615..79624787012 100644
--- a/lisp/net/browse-url.el
+++ b/lisp/net/browse-url.el
@@ -175,10 +175,10 @@ regexp should probably be \".\" to specify a default browser."
175 175
176(defcustom browse-url-secondary-browser-function 'browse-url-default-browser 176(defcustom browse-url-secondary-browser-function 'browse-url-default-browser
177 "Function used to launch an alternative browser. 177 "Function used to launch an alternative browser.
178This should usually be an external browser (that is, not eww or 178This is usually an external browser (that is, not eww or w3m),
179w3m), used as the secondary browser choice, and is typically used 179used as the secondary browser choice, typically when a prefix
180when giving a prefix argument to the URL-opening command (in 180argument is given to a URL-opening command in those modes that
181those modes that support this (for instance, eww/shr)." 181support this (for instance, eww/shr)."
182 :version "27.1" 182 :version "27.1"
183 :type browse-url--browser-defcustom-type) 183 :type browse-url--browser-defcustom-type)
184 184
@@ -1700,7 +1700,7 @@ If `current-prefix-arg' is non-nil, use
1700 (browse-url url))) 1700 (browse-url url)))
1701 1701
1702(defun browse-url-button-copy () 1702(defun browse-url-button-copy ()
1703 "Copy the URL under point" 1703 "Copy the URL under point."
1704 (interactive) 1704 (interactive)
1705 (let ((url (get-text-property (point) 'browse-url-data))) 1705 (let ((url (get-text-property (point) 'browse-url-data)))
1706 (unless url 1706 (unless url