From 1c4a3d2a527cf592b3b7ed645d5dff58eb46e569 Mon Sep 17 00:00:00 2001 From: bd Date: Sat, 18 Oct 2025 19:20:48 -0400 Subject: do not display exwm buffer in selector if not in curr workspace --- .config/emacs/modules/bd--utility.el | 10 ++++++---- 1 file changed, 6 insertions(+), 4 deletions(-) (limited to '.config/emacs') diff --git a/.config/emacs/modules/bd--utility.el b/.config/emacs/modules/bd--utility.el index d48ff02..33e2285 100644 --- a/.config/emacs/modules/bd--utility.el +++ b/.config/emacs/modules/bd--utility.el @@ -99,10 +99,12 @@ TODO default folder" '(eww-mode))) (defun bd/buffer-exwm-p (buf) - "Return non-nil if BUF is an `exwm-mode' buffer." - (member - (buffer-local-value 'major-mode (get-buffer buf)) - '(exwm-mode))) + "Return non-nil if BUF is an `exwm-mode' buffer and is in the current workspace." + (and (member + (buffer-local-value 'major-mode (get-buffer buf)) + '(exwm-mode)) + (eq (exwm-workspace--position exwm-workspace--current) + (alist-get 'exwm--desktop (buffer-local-variables (get-buffer buf)))))) (defun bd/buffer-scratch-p (buf) "Return non-nil if BUF is a scratch buffer." -- cgit v1.2.3