procyberian/emacs
1
0
Fork 0
Code Issues 1 Pull requests Projects 1 Releases Packages Wiki Activity Actions

Prefer 'setopt' in browse-url docs

Browse source 
* lisp/net/browse-url.el:
(browse-url-filename-alist): Doc fix; prefer 'setopt'.
This commit is contained in:
Stefan Kangas 2024-07-07 21:38:10 +02:00
parent 7668385390
commit 92de67829c
1 changed files with 9 additions and 9 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

18
lisp/net/browse-url.el
View file

@ -113,10 +113,10 @@
;; Use the Emacs Web Wowser (EWW) when not running under X11: ;; Use the Emacs Web Wowser (EWW) when not running under X11:
;; (or (eq window-system 'x) ;; (or (eq window-system 'x)
;; (setq browse-url-browser-function #'eww-browse-url)) ;; (setopt browse-url-browser-function #'eww-browse-url))
;; To always save modified buffers before displaying the file in a browser: ;; To always save modified buffers before displaying the file in a browser:
;; (setq browse-url-save-file t) ;; (setopt browse-url-save-file t)
;; To invoke different browsers/tools for different URLs, customize ;; To invoke different browsers/tools for different URLs, customize
;; `browse-url-handlers'. In earlier versions of Emacs, the same ;; `browse-url-handlers'. In earlier versions of Emacs, the same
@ -419,14 +419,14 @@ value converts ange-ftp-style file names into ftp URLs and prepends
`file:' to any file name beginning with `/'. `file:' to any file name beginning with `/'.
For example, adding to the default a specific translation of an ange-ftp For example, adding to the default a specific translation of an ange-ftp
address to an HTTP URL: address to an HTTPS URL:
(setq browse-url-filename-alist (setopt browse-url-filename-alist
\\='((\"/webmaster@webserver:/home/www/html/\" . \\='((\"/webmaster@webserver:/home/www/html/\" .
\"https://www.example.org/\") \"https://www.example.org/\")
(\"^/\\(ftp@\\|anonymous@\\)?\\([^:/]+\\):/*\" . \"ftp://\\2/\") (\"^/\\(ftp@\\|anonymous@\\)?\\([^:/]+\\):/*\" . \"ftp://\\2/\")
(\"^/\\([^:@/]+@\\)?\\([^:/]+\\):/*\" . \"ftp://\\1\\2/\") (\"^/\\([^:@/]+@\\)?\\([^:/]+\\):/*\" . \"ftp://\\1\\2/\")
(\"^/+\" . \"file:/\")))" (\"^/+\" . \"file:/\")))"
:type '(repeat (cons :format "%v" :type '(repeat (cons :format "%v"
(regexp :tag "Regexp") (regexp :tag "Regexp")
(string :tag "Replacement"))) (string :tag "Replacement")))