emacs.d

commit d9a2363525da2b4e76f747afecbfaaa9b8359c61
parent bb82011aa9d689fbb5a4362dfc141073cf64d673
Author: Jamie Beardslee <beardsleejamie@gmail.com>
Date:   Tue, 14 Apr 2020 23:18:50 +1200

[custom-exwm-config]: adjusted exwm-fullscreen-or-reset

EXWM got weird with me and stopped recognising keypresses after
(exwm-reset), so I now manually use (exwm-input-grab-keyboard) and
(exwm-layout-unset-fullscreen) with the current buffer's X id

Diffstat:
M
lisp/exwm/custom-exwm-config.el
 | 
9
++++++---

1 file changed, 6 insertions(+), 3 deletions(-)
diff --git a/lisp/exwm/custom-exwm-config.el b/lisp/exwm/custom-exwm-config.el
@@ -21,9 +21,12 @@
 (defun exwm-fullscreen-or-reset ()
   "Toggle EXWM fullscreen layout"
   (interactive)
-  (if (exwm-layout--fullscreen-p)
-      (exwm-reset)
-    (exwm-layout-set-fullscreen)))
+  (let ((id (exwm--buffer->id (current-buffer))))
+    (if (exwm-layout--fullscreen-p)
+	(progn
+	  (exwm-input-grab-keyboard id)
+	  (exwm-layout-unset-fullscreen id))
+      (exwm-layout-set-fullscreen id))))
 
 ;; Start a program without creating a buffer
 (defun exwm-shell-command (command)