diff options
| author | bd <bdunahu@operationnull.com> | 2024-12-24 02:09:18 -0700 |
|---|---|---|
| committer | bd <bdunahu@operationnull.com> | 2024-12-24 02:09:18 -0700 |
| commit | bf1a315a402de404239d62756dc180c042c641c8 (patch) | |
| tree | b20bbe554b579dd612734c13fa9eb23390d33dd7 /.config/emacs/modules/bd--browse.el | |
| parent | 0f2188dea14a19fa808da2261816318c8814846b (diff) | |
readd geiser-guile loads, whitespace fixes, paredit in ielm + eshell
Diffstat (limited to '.config/emacs/modules/bd--browse.el')
| -rw-r--r-- | .config/emacs/modules/bd--browse.el | 25 |
1 files changed, 13 insertions, 12 deletions
diff --git a/.config/emacs/modules/bd--browse.el b/.config/emacs/modules/bd--browse.el index ab61fa8..d6a09e4 100644 --- a/.config/emacs/modules/bd--browse.el +++ b/.config/emacs/modules/bd--browse.el @@ -14,7 +14,8 @@ icecat, or eww." (pcase pref (0 (eww url)) (1 (start-process "torbrowser" nil "torbrowser" "--new-window" url)) - (_ (start-process "icecat" nil "icecat" "--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 () @@ -57,10 +58,10 @@ icecat, or eww." (interactive "sURL or search string: ") (message "Ludu %s" url) (start-process "rip" nil - "mpv" "--force-window=yes" - (concat (if (string-match "https://.*" url) - "ytdl://" - "ytdl://ytsearch:") url))) + "mpv" "--force-window=yes" + (concat (if (string-match "https://.*" url) + "ytdl://" + "ytdl://ytsearch:") url))) (setopt browse-url-handlers `((,(regexp-opt '("youtube.com" "youtu.be" "deezer.page")) . @@ -71,8 +72,8 @@ icecat, or eww." :defer t :config (setopt shr-use-fonts t - shr-cookie-policy nil - shr-max-width 85)) + shr-cookie-policy nil + shr-max-width 85)) (use-package elpher :bind @@ -93,9 +94,9 @@ icecat, or eww." (t (funcall original url new-window)))) (advice-add 'eww :around 'bd/elpher) (setopt elpher-default-url-type "gemini" - elpher-connection-timeout 120 - elpher-gemini-max-fill-width 85 - elpher-use-emacs-bookmark-menu t)) + elpher-connection-timeout 120 + elpher-gemini-max-fill-width 85 + elpher-use-emacs-bookmark-menu t)) (use-package eww :hook @@ -104,8 +105,8 @@ icecat, or eww." (fill-column-mode)))) :config (setopt eww-search-prefix "https://duckduckgo.com/html/?q=" - eww-auto-rename-buffer 'title - eww-use-browse-url (regexp-opt '("mailto:" + eww-auto-rename-buffer 'title + eww-use-browse-url (regexp-opt '("mailto:" "youtube.com" "youtu.be")))) |