diff options
author | bd <bdunahu@operationnull.com> | 2025-04-04 00:52:38 -0400 |
---|---|---|
committer | bd <bdunahu@operationnull.com> | 2025-04-04 00:52:38 -0400 |
commit | 242908be106e7a00df51e27ea96cd46d672a127b (patch) | |
tree | a296f302c6f1b1722eea5ccfc417146a9279f49d /.config/emacs/modules/bd--utility.el | |
parent | 9a1a2f9792d55332345469973489f34eb76bdd56 (diff) |
Make eww the default browser for bd/selector-search
Diffstat (limited to '.config/emacs/modules/bd--utility.el')
-rw-r--r-- | .config/emacs/modules/bd--utility.el | 9 |
1 files changed, 8 insertions, 1 deletions
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) |