diff options
| author | Basil L. Contovounesios | 2019-08-02 16:39:53 +0300 |
|---|---|---|
| committer | Basil L. Contovounesios | 2019-08-02 16:42:38 +0300 |
| commit | 695fbcf56db5a4336865e64b6d076008c62ce2ef (patch) | |
| tree | 610a59ae252734187dd0c1f4f29ebe45624270fb | |
| parent | 558038ccb76614d60bf54cb62359027d25e00f72 (diff) | |
| download | emacs-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.el | 10 |
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. |
| 178 | This should usually be an external browser (that is, not eww or | 178 | This is usually an external browser (that is, not eww or w3m), |
| 179 | w3m), used as the secondary browser choice, and is typically used | 179 | used as the secondary browser choice, typically when a prefix |
| 180 | when giving a prefix argument to the URL-opening command (in | 180 | argument is given to a URL-opening command in those modes that |
| 181 | those modes that support this (for instance, eww/shr)." | 181 | support 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 |