diff options
Diffstat (limited to '.config/emacs/modules')
-rw-r--r-- | .config/emacs/modules/bd--browse.el | 12 | ||||
-rw-r--r-- | .config/emacs/modules/bd--minibuffer.el | 1 | ||||
-rw-r--r-- | .config/emacs/modules/bd--shells.el | 2 | ||||
-rw-r--r-- | .config/emacs/modules/bd--utility.el | 9 |
4 files changed, 16 insertions, 8 deletions
diff --git a/.config/emacs/modules/bd--browse.el b/.config/emacs/modules/bd--browse.el index 3731b18..2689ac8 100644 --- a/.config/emacs/modules/bd--browse.el +++ b/.config/emacs/modules/bd--browse.el @@ -56,11 +56,11 @@ icecat, or eww." (selector-source-create "Browser" :candidates - (list (bd/search-candidate "SearXNG" "https://searx.operationnull.com/searxng/search?q=" 3) - (bd/search-candidate "Wikipedia" "https://en.wikipedia.org/w/index.php?search=" 3) + (list (bd/search-candidate "SearXNG" "https://searx.operationnull.com/searxng/search?q=" 0) + (bd/search-candidate "Wikipedia" "https://en.wikipedia.org/w/index.php?search=" 0) (bd/search-candidate "Invidious" "https://inv.nadeko.net/search?q=" 0) - (bd/search-candidate "Urban Dictionary" "https://www.urbandictionary.com/define.php?term=" 2) - (bd/search-candidate "Archwiki" "https://wiki.archlinux.org/index.php?title=Special%3ASearch&search=" 2) + (bd/search-candidate "Urban Dictionary" "https://www.urbandictionary.com/define.php?term=" 0) + (bd/search-candidate "Archwiki" "https://wiki.archlinux.org/index.php?title=Special%3ASearch&search=" 0) (bd/selector-rip) (bd/search-candidate "Web" "" 3)))) @@ -111,10 +111,10 @@ icecat, or eww." (use-package eww :hook ((eww-after-render . (lambda () - (setq-local fill-column-desired-width 90) + (setq-local fill-column-desired-width 120) (fill-column-mode)))) :config - (setopt eww-search-prefix "https://duckduckgo.com/html/?q=" + (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" diff --git a/.config/emacs/modules/bd--minibuffer.el b/.config/emacs/modules/bd--minibuffer.el index 405577c..de9c37d 100644 --- a/.config/emacs/modules/bd--minibuffer.el +++ b/.config/emacs/modules/bd--minibuffer.el @@ -99,6 +99,7 @@ selection commands.") (selector (list (bd/selector-recent-buffers) + (bd/selector-buffer-type "EWW" #'bd/buffer-eww-p) (bd/selector-buffer-type "EXWM" #'bd/buffer-exwm-p) (bd/selector-buffer-type "Shell" #'bd/buffer-shell-p) (bd/selector-buffer-type "IRC" #'bd/buffer-irc-p) diff --git a/.config/emacs/modules/bd--shells.el b/.config/emacs/modules/bd--shells.el index d77b6f4..2bbf403 100644 --- a/.config/emacs/modules/bd--shells.el +++ b/.config/emacs/modules/bd--shells.el @@ -125,7 +125,7 @@ allowed." (setopt proced-enable-color-flag t proced-tree-flag t proced-auto-update-flag 'visible - proced-auto-update-interval 1 + proced-auto-update-interval 3 proced-descend t proced-filter 'user)) diff --git a/.config/emacs/modules/bd--utility.el b/.config/emacs/modules/bd--utility.el index 161549e..d48ff02 100644 --- a/.config/emacs/modules/bd--utility.el +++ b/.config/emacs/modules/bd--utility.el @@ -92,6 +92,12 @@ TODO default folder" (locate-dominating-file "." "manifest.scm") ;; guix default-directory)) +(defun bd/buffer-eww-p (buf) + "Return non-nil if BUF is a `eww-mode' buffer." + (member + (buffer-local-value 'major-mode (get-buffer buf)) + '(eww-mode))) + (defun bd/buffer-exwm-p (buf) "Return non-nil if BUF is an `exwm-mode' buffer." (member @@ -130,7 +136,8 @@ TODO default folder" (defun bd/buffer-ordinary-p (buf) "Return non-nil if BUF does not fit into known categories." - (not (or (bd/buffer-exwm-p buf) + (not (or (bd/buffer-eww-p buf) + (bd/buffer-exwm-p buf) (bd/buffer-text-p buf) (bd/buffer-prog-p buf) (bd/buffer-shell-p buf) |