1 files changed, 25 insertions, 9 deletions
diff --git a/init.el b/init.el
index 5ab1559..4de92d4 100644
--- a/init.el
+++ b/init.el

@@ -81,15 +81,31 @@
                browse-url-firefox-new-window-is-tab t)
  (acdw/browse-url-set-handlers
-   `(("\\.jpe?g\\'" . ,(if (executable-find "feh")
+   (list
-                           #'browse-url-feh
+    (cons (rx (seq "." (or "jpeg" "jpg" ; images
-                         #'eww-browse-url))
+                           "png")
-     ("youtube\\.com\\|youtu\\.be" . ,(if (executable-find "mpv")
+                   eos))
-                                          #'browse-url-mpv
+          (lambda (&rest args)
-                                        #'eww-browse-url))
+            (apply (if (executable-find "feh")
-     ("google\\.com" . browse-url-default-browser)
+                       #'browse-url-feh
-     ("\\(twitter\\.com\\|t\\.co\\)" . acdw/eww-browse-twitter-url)
+                     #'eww-browse-url)
-     ("." . eww-browse-url)))
+                   args)))
+    (cons (rx (or "youtube.com"         ; videos
+                  "youtu.be"
+                  (seq "." (or "mp4"
+                               "gif")
+                       eos)))
+          (lambda (&rest args)
+            (apply (if (executable-find "mpv")
+                       #'browse-url-mpv
+                     browse-url-secondary-browser-function)
+                   args)))
+    (cons (rx (or "google.com"         ; websites that don't work with eww
+                  "reddit.com"
+                  "twitter.com"))
+          browse-url-secondary-browser-function)
+    (cons "."                          ; everything else
+          #'eww-browse-url)))
  ;; Buttonize gemini:// links.
  (acdw/add-button-url-regexp-protocol "gemini"))

diff --git a/init.el b/init.el index 5ab1559..4de92d4 100644 --- a/init.el +++ b/init.el
@@ -81,15 +81,31 @@
81	browse-url-firefox-new-window-is-tab t)	81	browse-url-firefox-new-window-is-tab t)
82		82
83	(acdw/browse-url-set-handlers	83	(acdw/browse-url-set-handlers
84	`(("\\.jpe?g\\'" . ,(if (executable-find "feh")	84	(list
85	#'browse-url-feh	85	(cons (rx (seq "." (or "jpeg" "jpg" ; images
86	#'eww-browse-url))	86	"png")
87	("youtube\\.com\\\|youtu\\.be" . ,(if (executable-find "mpv")	87	eos))
88	#'browse-url-mpv	88	(lambda (&rest args)
89	#'eww-browse-url))	89	(apply (if (executable-find "feh")
90	("google\\.com" . browse-url-default-browser)	90	#'browse-url-feh
91	("\\(twitter\\.com\\\|t\\.co\\)" . acdw/eww-browse-twitter-url)	91	#'eww-browse-url)
92	("." . eww-browse-url)))	92	args)))
		93	(cons (rx (or "youtube.com" ; videos
		94	"youtu.be"
		95	(seq "." (or "mp4"
		96	"gif")
		97	eos)))
		98	(lambda (&rest args)
		99	(apply (if (executable-find "mpv")
		100	#'browse-url-mpv
		101	browse-url-secondary-browser-function)
		102	args)))
		103	(cons (rx (or "google.com" ; websites that don't work with eww
		104	"reddit.com"
		105	"twitter.com"))
		106	browse-url-secondary-browser-function)
		107	(cons "." ; everything else
		108	#'eww-browse-url)))
93		109
94	;; Buttonize gemini:// links.	110	;; Buttonize gemini:// links.
95	(acdw/add-button-url-regexp-protocol "gemini"))	111	(acdw/add-button-url-regexp-protocol "gemini"))