[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
feature/browse-url-handlers 11e6883: Move browse-url-handlers defcustom
From: |
Tassilo Horn |
Subject: |
feature/browse-url-handlers 11e6883: Move browse-url-handlers defcustom below other defcustoms. |
Date: |
Mon, 4 May 2020 09:46:11 -0400 (EDT) |
branch: feature/browse-url-handlers
commit 11e6883e30ed61a09ae390de9f59b54ccb602b87
Author: Tassilo Horn <address@hidden>
Commit: Tassilo Horn <address@hidden>
Move browse-url-handlers defcustom below other defcustoms.
That defcustom's default value contained other defcustoms which need
to be evaluated first.
---
lisp/net/browse-url.el | 34 +++++++++++++++++-----------------
1 file changed, 17 insertions(+), 17 deletions(-)
diff --git a/lisp/net/browse-url.el b/lisp/net/browse-url.el
index ab0be7b..35930c7 100644
--- a/lisp/net/browse-url.el
+++ b/lisp/net/browse-url.el
@@ -175,23 +175,6 @@ Also see `browse-url-secondary-browser-function'."
:type browse-url--browser-defcustom-type
:version "24.1")
-;;;#autoload
-(defcustom browse-url-handlers
- `(("\\`mailto:" . ,browse-url-mailto-function)
- ("\\`man:" . ,browse-url-man-function))
- "An alist with elements of the form (REGEXP HANDLER).
-Each REGEXP is matched against each URL to be opened in turn and
-the first match's HANDLER is invoked with the URL.
-
-A HANDLER must either be a function with the same arguments as
-`browse-url' or a variable whos value is such a function.
-
-If no REGEXP matches, the bug reference URL is opened using the
-value of `browse-url-browser-function'."
- :type '(alist :key-type (regexp :tag "Regexp")
- :value-type (function :tag "Handler"))
- :version "28.1")
-
(defcustom browse-url-secondary-browser-function 'browse-url-default-browser
"Function used to launch an alternative browser.
This is usually an external browser (that is, not eww or w3m),
@@ -612,6 +595,23 @@ down (this *won't* always work)."
"Wrapper command prepended to the Elinks command-line."
:type '(repeat (string :tag "Wrapper")))
+;;;###autoload
+(defcustom browse-url-handlers
+ `(("\\`mailto:" . ,browse-url-mailto-function)
+ ("\\`man:" . ,browse-url-man-function))
+ "An alist with elements of the form (REGEXP HANDLER).
+Each REGEXP is matched against each URL to be opened in turn and
+the first match's HANDLER is invoked with the URL.
+
+A HANDLER must either be a function with the same arguments as
+`browse-url' or a variable whos value is such a function.
+
+If no REGEXP matches, the bug reference URL is opened using the
+value of `browse-url-browser-function'."
+ :type '(alist :key-type (regexp :tag "Regexp")
+ :value-type (function :tag "Handler"))
+ :version "28.1")
+
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;; URL encoding
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- feature/browse-url-handlers 11e6883: Move browse-url-handlers defcustom below other defcustoms.,
Tassilo Horn <=