diff options
Diffstat (limited to '.config/emacs')
| -rw-r--r-- | .config/emacs/modules/bd--browse.el | 24 |
1 files changed, 17 insertions, 7 deletions
diff --git a/.config/emacs/modules/bd--browse.el b/.config/emacs/modules/bd--browse.el index 2689ac8..d921b8d 100644 --- a/.config/emacs/modules/bd--browse.el +++ b/.config/emacs/modules/bd--browse.el @@ -12,8 +12,7 @@ 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)) + (1 (start-process "icecat" nil "icecat" "--new-window" url)) (_ (start-process "librewolf" nil "librewolf" "--new-window" url)))) (setopt browse-url-browser-function 'bd/browse) @@ -81,9 +80,7 @@ icecat, or eww." (use-package shr :defer t :config - (setopt shr-use-fonts t - shr-cookie-policy nil - shr-max-width 85)) + (setopt )) (use-package elpher :bind @@ -109,16 +106,29 @@ icecat, or eww." elpher-use-emacs-bookmark-menu t)) (use-package eww + :bind + (:map eww-mode-map + ("i" . bd/eww-toggle-images)) :hook ((eww-after-render . (lambda () (setq-local fill-column-desired-width 120) (fill-column-mode)))) :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-use-browse-url (regexp-opt '("mailto:" - "youtube.com" - "youtu.be")))) + "youtube.com" + "youtu.be")) + shr-use-fonts t + shr-inhibit-images t + shr-cookie-policy nil + shr-max-width 85)) (provide 'bd--browse) |