* lisp/net/eww.el (eww-retrieve-command): Add :tag.

This commit is contained in:
Robert Pluim 2021-10-21 15:53:35 +02:00
parent cf7d8fb1d7
commit 24083c8d13

View file

@ -145,12 +145,12 @@ The string will be passed through `substitute-command-keys'."
"Command to retrieve an URL via an external program. "Command to retrieve an URL via an external program.
If nil, `url-retrieve' is used to download the data. If nil, `url-retrieve' is used to download the data.
If `sync', `url-retrieve-synchronously' is used. If `sync', `url-retrieve-synchronously' is used.
For other non-nil values, this should be a list where the first item For other non-nil values, this should be a list of strings where
is the program, and the rest are the arguments." the first item is the program, and the rest are the arguments."
:version "28.1" :version "28.1"
:type '(choice (const :tag "Use `url-retrieve'" nil) :type '(choice (const :tag "Use `url-retrieve'" nil)
(const :tag "Use `url-retrieve-synchronously'" sync) (const :tag "Use `url-retrieve-synchronously'" sync)
(repeat string))) (repeat :tag "Command/args" string )))
(defcustom eww-use-external-browser-for-content-type (defcustom eww-use-external-browser-for-content-type
"\\`\\(video/\\|audio/\\|application/ogg\\)" "\\`\\(video/\\|audio/\\|application/ogg\\)"
@ -1901,7 +1901,7 @@ Use link at point if there is one, else the current page's URL."
(defun eww-set-character-encoding (charset) (defun eww-set-character-encoding (charset)
"Set character encoding to CHARSET. "Set character encoding to CHARSET.
If CHARSET is nil then use UTF-8." If CHARSET is nil then use UTF-8."
(interactive "zUse character set (default utf-8): " eww-mode) (interactive "zUse character set (default `utf-8'): " eww-mode)
(if (null charset) (if (null charset)
(eww-reload nil 'utf-8) (eww-reload nil 'utf-8)
(eww-reload nil charset))) (eww-reload nil charset)))