From 28e603ca7b694d53a664ca0f5dd543b4dcd86d21 Mon Sep 17 00:00:00 2001 From: Stefan Kangas Date: Sun, 7 Jul 2024 21:38:10 +0200 Subject: [PATCH] Prefer 'setopt' in browse-url docs * lisp/net/browse-url.el: (browse-url-filename-alist): Doc fix; prefer 'setopt'. (cherry picked from commit 92de67829ca18b4957cb995a1442f2ccac80847c) --- lisp/net/browse-url.el | 20 ++++++++++---------- 1 file changed, 10 insertions(+), 10 deletions(-) diff --git a/lisp/net/browse-url.el b/lisp/net/browse-url.el index d3473e8877d..e7912a2a4a7 100644 --- a/lisp/net/browse-url.el +++ b/lisp/net/browse-url.el @@ -113,10 +113,10 @@ ;; Use the Emacs Web Wowser (EWW) when not running under X11: ;; (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: -;; (setq browse-url-save-file t) +;; (setopt browse-url-save-file t) ;; To invoke different browsers/tools for different URLs, customize ;; `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 `/'. For example, adding to the default a specific translation of an ange-ftp -address to an HTTP URL: - - (setq browse-url-filename-alist - \\='((\"/webmaster@webserver:/home/www/html/\" . - \"https://www.example.org/\") - (\"^/\\(ftp@\\|anonymous@\\)?\\([^:/]+\\):/*\" . \"ftp://\\2/\") - (\"^/\\([^:@/]+@\\)?\\([^:/]+\\):/*\" . \"ftp://\\1\\2/\") - (\"^/+\" . \"file:/\")))" +address to an HTTPS URL: + + (setopt browse-url-filename-alist + \\='((\"/webmaster@webserver:/home/www/html/\" . + \"https://www.example.org/\") + (\"^/\\(ftp@\\|anonymous@\\)?\\([^:/]+\\):/*\" . \"ftp://\\2/\") + (\"^/\\([^:@/]+@\\)?\\([^:/]+\\):/*\" . \"ftp://\\1\\2/\") + (\"^/+\" . \"file:/\")))" :type '(repeat (cons :format "%v" (regexp :tag "Regexp") (string :tag "Replacement"))) -- 2.39.2