Commit | Line | Data |
---|---|---|
ba7a63da DNB |
1 | From edb930005b0ba83051ca8a59b493e9a3c8ef580a Mon Sep 17 00:00:00 2001 |
2 | From: Chris Feng <chris.w.feng@gmail.com> | |
3 | Date: Sun, 14 Jun 2020 00:00:00 +0000 | |
4 | Subject: [PATCH] Fix fullscreen states | |
5 | ||
6 | * exwm-layout.el (exwm-layout-set-fullscreen, | |
7 | exwm-layout-unset-fullscreen): Use `exwm--id' for interactive use. | |
8 | (exwm-layout-unset-fullscreen): Mandatorily clear fullscreen states. | |
9 | --- | |
10 | exwm-layout.el | 6 ++++-- | |
11 | 1 file changed, 4 insertions(+), 2 deletions(-) | |
12 | ||
13 | diff --git a/exwm-layout.el b/exwm-layout.el | |
14 | index 170c2be..79d0c95 100644 | |
15 | --- a/exwm-layout.el | |
16 | +++ b/exwm-layout.el | |
17 | @@ -205,7 +205,7 @@ | |
18 | :border-width 0 | |
19 | :stack-mode xcb:StackMode:Above)) | |
20 | (cl-pushnew xcb:Atom:_NET_WM_STATE_FULLSCREEN exwm--ewmh-state) | |
21 | - (exwm-layout--set-ewmh-state id) | |
22 | + (exwm-layout--set-ewmh-state exwm--id) | |
23 | (xcb:flush exwm--connection) | |
24 | (set-window-dedicated-p (get-buffer-window) t) | |
25 | (exwm-input--release-keyboard exwm--id))) | |
26 | @@ -233,7 +233,9 @@ | |
27 | (let ((window (get-buffer-window nil t))) | |
28 | (when window | |
29 | (exwm-layout--show exwm--id window)))) | |
30 | - (exwm-layout--set-ewmh-state id) | |
31 | + (setq exwm--ewmh-state | |
32 | + (delq xcb:Atom:_NET_WM_STATE_FULLSCREEN exwm--ewmh-state)) | |
33 | + (exwm-layout--set-ewmh-state exwm--id) | |
34 | (xcb:flush exwm--connection) | |
35 | (set-window-dedicated-p (get-buffer-window) nil) | |
36 | (when (eq 'line-mode exwm--selected-input-mode) | |
37 | -- | |
38 | 2.26.2 | |
39 |