summaryrefslogtreecommitdiff
path: root/.config/emacs/modules/bd--browse.el
diff options
context:
space:
mode:
authorbd <bdunahu@operationnull.com>2025-01-02 20:22:58 -0700
committerbd <bdunahu@operationnull.com>2025-01-02 20:22:58 -0700
commit60a03d5e73a0a75eeef1d500e2da3307c5687278 (patch)
treeed00d19ee09dcf9122fd9c403474727a3ab55e49 /.config/emacs/modules/bd--browse.el
parent3fe5620211b811b44189b6c6025a497573adfdef (diff)
yasnippet->abbrev-mode
Diffstat (limited to '.config/emacs/modules/bd--browse.el')
-rw-r--r--.config/emacs/modules/bd--browse.el12
1 files changed, 11 insertions, 1 deletions
diff --git a/.config/emacs/modules/bd--browse.el b/.config/emacs/modules/bd--browse.el
index 1d97760..f0a4f60 100644
--- a/.config/emacs/modules/bd--browse.el
+++ b/.config/emacs/modules/bd--browse.el
@@ -6,7 +6,17 @@
(require 'dash)
(require 'fill-column)
-(defconst bd/bookmarks nil)
+(defun bd/browse (url &optional pref &rest _)
+ "Given PREF, launches URL in one of librewolf, torbrowser,
+icecat, or eww."
+ (interactive)
+ (pcase pref
+ (0 (eww url))
+ (1 (start-process "torbrowser" nil "torbrowser" "--new-window" url))
+ (2 (start-process "icecat" nil "icecat" "--new-window" url))
+ (_ (start-process "librewolf" nil "librewolf" "--new-window" url))))
+(setopt browse-url-browser-function 'bd/browse)
+
(defun bd/selector-bookmarks ()
"Selector source for all bookmarks."
(selector-source-create