From edb930005b0ba83051ca8a59b493e9a3c8ef580a Mon Sep 17 00:00:00 2001
From: Chris Feng <chris.w.feng@gmail.com>
Date: Sun, 14 Jun 2020 00:00:00 +0000
Subject: [PATCH] Fix fullscreen states

* exwm-layout.el (exwm-layout-set-fullscreen,
exwm-layout-unset-fullscreen): Use `exwm--id' for interactive use.
(exwm-layout-unset-fullscreen): Mandatorily clear fullscreen states.
---
 exwm-layout.el | 6 ++++--
 1 file changed, 4 insertions(+), 2 deletions(-)

diff --git a/exwm-layout.el b/exwm-layout.el
index 170c2be..79d0c95 100644
--- a/exwm-layout.el
+++ b/exwm-layout.el
@@ -205,7 +205,7 @@
                        :border-width 0
                        :stack-mode xcb:StackMode:Above))
     (cl-pushnew xcb:Atom:_NET_WM_STATE_FULLSCREEN exwm--ewmh-state)
-    (exwm-layout--set-ewmh-state id)
+    (exwm-layout--set-ewmh-state exwm--id)
     (xcb:flush exwm--connection)
     (set-window-dedicated-p (get-buffer-window) t)
     (exwm-input--release-keyboard exwm--id)))
@@ -233,7 +233,9 @@
       (let ((window (get-buffer-window nil t)))
         (when window
           (exwm-layout--show exwm--id window))))
-    (exwm-layout--set-ewmh-state id)
+    (setq exwm--ewmh-state
+          (delq xcb:Atom:_NET_WM_STATE_FULLSCREEN exwm--ewmh-state))
+    (exwm-layout--set-ewmh-state exwm--id)
     (xcb:flush exwm--connection)
     (set-window-dedicated-p (get-buffer-window) nil)
     (when (eq 'line-mode exwm--selected-input-mode)
-- 
2.26.2

mmit</a><a href='/guix/diff/gnu/installer/newt/parameters.scm?id=12ec22ca50fe580c3210a5cfa27e7d483e722cff'>diff</a></td><td class='form'><form class='right' method='get' action='/guix/log/gnu/installer/newt/parameters.scm'>
<input type='hidden' name='id' value='12ec22ca50fe580c3210a5cfa27e7d483e722cff'/><select name='qt'>
<option value='grep'>log msg</option>
<option value='author'>author</option>
<option value='committer'>committer</option>
<option value='range'>range</option>
</select>
<input class='txt' type='search' size='10' name='q' value=''/>
<input type='submit' value='search'/>
</form>
</td></tr></table>
<div class='path'>path: <a href='/guix/log/?id=12ec22ca50fe580c3210a5cfa27e7d483e722cff'>root</a>/<a href='/guix/log/gnu?id=12ec22ca50fe580c3210a5cfa27e7d483e722cff'>gnu</a>/<a href='/guix/log/gnu/installer?id=12ec22ca50fe580c3210a5cfa27e7d483e722cff'>installer</a>/<a href='/guix/log/gnu/installer/newt?id=12ec22ca50fe580c3210a5cfa27e7d483e722cff'>newt</a>/<a href='/guix/log/gnu/installer/newt/parameters.scm?id=12ec22ca50fe580c3210a5cfa27e7d483e722cff'>parameters.scm</a></div><div class='content'><table class='list nowrap'><tr class='nohover'><th class='left'>Age</th><th class='left'>Commit message (<a href='/guix/log/gnu/installer/newt/parameters.scm?id=12ec22ca50fe580c3210a5cfa27e7d483e722cff&amp;showmsg=1'>Expand</a>)</th><th class='left'>Author</th></tr>
<tr><td><span title='2020-11-07 18:17:32 +0100'>2020-11-07</span></td><td><a href='/guix/commit/gnu/installer/newt/parameters.scm?id=c2396ceb6eb30ac87755eb8b39583403b35fbd12'>installer: parameters: Add a reboot button.</a><span class='msg-avail'>...<span class='msg-tooltip'>Suggested by: zimoun &lt;zimon.toutoune@gmail.com&gt;.

* gnu/installer/newt/parameters.scm (run-parameters-page): Add a reboot
button.
</span></span></td><td>Mathieu Othacehe</td></tr>
<tr><td><span title='2020-04-08 10:24:02 +0200'>2020-04-08</span></td><td><a href='/guix/commit/gnu/installer/newt/parameters.scm?id=ee0ad7803c82383ac1bced073d8670bc407797e7'>installer: Add proxy support.</a><span class='msg-avail'>...<span class='msg-tooltip'>* gnu/installer/proxy.scm: New file.
* gnu/local.mk (INSTALLER_MODULES): Add it.
* po/guix/POTFILES.in: Add it.
* gnu/installer/newt/parameters.scm (run-proxy-page): New procedure,
(run-parameters-page): add the previous procedure to the parameters menu.
</span></span></td><td>Mathieu Othacehe</td></tr>
<tr><td><span title='2020-04-08 10:24:02 +0200'>2020-04-08</span></td><td><a href='/guix/commit/gnu/installer/newt/parameters.scm?id=07a53bd512530d8f87e076263227216c467727bb'>installer: Turn help menu into parameters menu.</a><span class='msg-avail'>...<span class='msg-tooltip'>* gnu/local.mk (INSTALLER_MODULES): Rename help.scm into parameters.scm.
* po/guix/POTFILES.in: Ditto.
* gnu/installer/record.scm (&lt;installer&gt;): Rename help-menu into parameter-menu
and help-page into parameters-page.
* gnu/installer/newt/parameters.scm: Renamed from help.scm. Update information
messages.
* gnu/installer/newt.scm: Update accordingly.
* gnu/installer/newt/keymap.scm: Ditto.
</span></span></td><td>Mathieu Othacehe</td></tr>