diff options
Diffstat (limited to '.config/emacs/modules/bd--browse.el')
| -rw-r--r-- | .config/emacs/modules/bd--browse.el | 27 |
1 files changed, 25 insertions, 2 deletions
diff --git a/.config/emacs/modules/bd--browse.el b/.config/emacs/modules/bd--browse.el index b4e77aa..1854f52 100644 --- a/.config/emacs/modules/bd--browse.el +++ b/.config/emacs/modules/bd--browse.el @@ -70,8 +70,8 @@ icecat, or eww." (use-package eww :hook ((eww-after-render . (lambda () - (setq-local fill-column-desired-width 90) - (fill-column-mode)))) + (setq-local fill-column-desired-width 90) + (fill-column-mode)))) :custom (eww-search-prefix "https://duckduckgo.com/html/?q=") (eww-auto-rename-buffer 'title) @@ -79,6 +79,29 @@ icecat, or eww." "youtube.com" "youtu.be")))) +(use-package elpher + :bind + (:map elpher-mode-map + ("l" . #'elpher-back) + ("d" . #'elpher-download) + ("w" . #'elpher-copy-current-url) + ("A" . #'elpher-copy-link-url) + ("E" . #'elpher-bookmark-current) + ("TAB" . #'elpher-next-link) + ("g" . #'elpher-reload) + ("G" . #'elpher-go)) + :config + (defun bd/elpher (original url &optional new-window) + "Handle gemini links." + (cond ((string-match-p "\\`\\(gemini\\|gopher\\)://" url) + (elpher-go url)) + (t (funcall original url new-window)))) + (advice-add 'eww :around 'bd/elpher) + :custom + (elpher-use-tls t) + (elpher-gemini-max-fill-width 85) + (elpher-use-emacs-bookmark-menu t)) + (use-package apropos :bind (("C-h a" . selector-apropos))) |