diff options
Diffstat (limited to '.config/emacs/modules/bd--browse.el')
| -rw-r--r-- | .config/emacs/modules/bd--browse.el | 37 |
1 files changed, 12 insertions, 25 deletions
diff --git a/.config/emacs/modules/bd--browse.el b/.config/emacs/modules/bd--browse.el index 92bc0bf..22bbb6c 100644 --- a/.config/emacs/modules/bd--browse.el +++ b/.config/emacs/modules/bd--browse.el @@ -12,7 +12,6 @@ icecat, or eww." (interactive) (pcase pref (0 (eww url)) - (1 (start-process "icecat" nil "icecat" "--new-window" url)) (_ (start-process "librewolf" nil "librewolf" "--new-window" url)))) (setopt browse-url-browser-function 'bd/browse) @@ -62,7 +61,7 @@ icecat, or eww." (bd/search-candidate "Archwiki" "https://wiki.archlinux.org/index.php?title=Special%3ASearch&search=" 0) (bd/selector-rip) - (bd/search-candidate "Web" "" 3)))) + (bd/search-candidate "Web" "" 1)))) (defun bd/browse-dispatcher () "Select and `browse-url' a bookmark or search feature." @@ -77,11 +76,6 @@ icecat, or eww." (lambda (url &rest _) (rip url)))) url-privacy-level '(email os emacs lastloc cookies)) -(use-package shr - :defer t - :config - (setopt )) - (use-package elpher :bind (:map elpher-mode-map @@ -106,30 +100,23 @@ icecat, or eww." elpher-use-emacs-bookmark-menu t)) (use-package eww + :defer 1 :bind (:map eww-mode-map - ("i" . eww-toggle-images)) - :hook - ((eww-after-render . (lambda () - (setq-local fill-column-desired-width 120) - (fill-column-mode)))) + ("i" . eww-toggle-images)) :config - (defun bd/eww-toggle-images () - (interactive) - (setq-local shr-inhibit-images (not shr-inhibit-images)) - (eww-reload t) - (message "%s images" - (if shr-inhibit-images "Disabled" "Enabled"))) (setopt eww-search-prefix "https://searx.operationnull.com/searxng/search?q=" eww-auto-rename-buffer 'title - eww-browse-url-new-window-is-tab nil + eww-browse-url-new-window-is-tab nil + browse-url-secondary-browser-function #'bd/browse + eww-header-line-format nil eww-use-browse-url (regexp-opt '("mailto:" - "youtube.com" - "youtu.be")) - shr-use-fonts t - shr-inhibit-images t - shr-cookie-policy nil - shr-max-width 85)) + "youtube.com" + "youtu.be")) + shr-use-fonts nil + shr-inhibit-images t + shr-cookie-policy nil + shr-max-width 90)) (provide 'bd--browse) |