diff options
Diffstat (limited to 'init.el')
-rw-r--r-- | init.el | 9 |
1 files changed, 5 insertions, 4 deletions
diff --git a/init.el b/init.el index 0b1d8b0..261d8c7 100644 --- a/init.el +++ b/init.el | |||
@@ -96,6 +96,7 @@ | |||
96 | (:require +browse-url) | 96 | (:require +browse-url) |
97 | (:option | 97 | (:option |
98 | browse-url-browser-function #'eww-browse-url | 98 | browse-url-browser-function #'eww-browse-url |
99 | +browse-url-browser-function browse-url-browser-function | ||
99 | browse-url-secondary-browser-function (if (executable-find "firefox") | 100 | browse-url-secondary-browser-function (if (executable-find "firefox") |
100 | #'browse-url-firefox | 101 | #'browse-url-firefox |
101 | #'browse-url-default-browser) | 102 | #'browse-url-default-browser) |
@@ -137,10 +138,10 @@ | |||
137 | #'+browse-url-with-mpv | 138 | #'+browse-url-with-mpv |
138 | browse-url-secondary-browser-function) | 139 | browse-url-secondary-browser-function) |
139 | args))) | 140 | args))) |
140 | (cons (lambda (url) ; non-eww-friendly websites | 141 | (cons (+browse-url-secondary-browser-regexps-combine) ; non-text websites |
141 | (cl-member url +browse-url-secondary-browser-regexps | 142 | browse-url-secondary-browser-function) |
142 | :test 'string-match-p)) | 143 | (cons "." ; everything else |
143 | #'browse-url-secondary-browser-function))) | 144 | browse-url-browser-function))) |
144 | ;; Transform URLs before passing to `browse-url' | 145 | ;; Transform URLs before passing to `browse-url' |
145 | (:option +browse-url-transformations `((,(rx "//" (or "youtube.com" | 146 | (:option +browse-url-transformations `((,(rx "//" (or "youtube.com" |
146 | "youtu.be")) | 147 | "youtu.be")) |