]> git.eshelyaron.com Git - emacs.git/commitdiff
Prefer 'setopt' in browse-url docs
authorStefan Kangas <stefankangas@gmail.com>
Sun, 7 Jul 2024 19:38:10 +0000 (21:38 +0200)
committerEshel Yaron <me@eshelyaron.com>
Tue, 9 Jul 2024 17:49:26 +0000 (19:49 +0200)
* lisp/net/browse-url.el:
(browse-url-filename-alist): Doc fix; prefer 'setopt'.

(cherry picked from commit 92de67829ca18b4957cb995a1442f2ccac80847c)

lisp/net/browse-url.el

index d3473e8877da50408fee1000c452befc46a7d28f..e7912a2a4a7d31c5c5e195dd1c05868e1fe3a3c4 100644 (file)
 
 ;; 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")))