mirror of
https://github.com/emacs-exwm/exwm.git
synced 2024-11-23 21:17:59 +01:00
Remove redundant code for fullscreen mode
* exwm-manage.el (exwm-manage--unmanage-window) (exwm--on-ClientMessage): No need to modify workspace when an X window enters/leaves fullscreen mode.
This commit is contained in:
parent
7d4c57a6ab
commit
bfa35c0e38
2 changed files with 7 additions and 13 deletions
|
@ -322,9 +322,6 @@ manager is shutting down."
|
||||||
:window window :parent exwm--root :x 0 :y 0))
|
:window window :parent exwm--root :x 0 :y 0))
|
||||||
(xcb:+request exwm--connection
|
(xcb:+request exwm--connection
|
||||||
(make-instance 'xcb:DestroyWindow :window container))))
|
(make-instance 'xcb:DestroyWindow :window container))))
|
||||||
;; Restore the workspace if this X window is currently fullscreen.
|
|
||||||
(when (memq xcb:Atom:_NET_WM_STATE_FULLSCREEN exwm--ewmh-state)
|
|
||||||
(exwm-workspace--set-fullscreen exwm--frame))
|
|
||||||
(exwm-manage--set-client-list)
|
(exwm-manage--set-client-list)
|
||||||
(xcb:flush exwm--connection))
|
(xcb:flush exwm--connection))
|
||||||
(let ((kill-buffer-func
|
(let ((kill-buffer-func
|
||||||
|
|
17
exwm.el
17
exwm.el
|
@ -480,16 +480,13 @@
|
||||||
(when (and (not buffer)
|
(when (and (not buffer)
|
||||||
(memq xcb:Atom:_NET_WM_STATE_FULLSCREEN props)
|
(memq xcb:Atom:_NET_WM_STATE_FULLSCREEN props)
|
||||||
(= action xcb:ewmh:_NET_WM_STATE_ADD))
|
(= action xcb:ewmh:_NET_WM_STATE_ADD))
|
||||||
(dolist (f exwm-workspace--list)
|
(xcb:+request
|
||||||
(when (equal (frame-parameter f 'exwm-outer-id) id)
|
exwm--connection
|
||||||
(exwm-workspace--set-fullscreen f)
|
(make-instance 'xcb:ewmh:set-_NET_WM_STATE
|
||||||
(xcb:+request
|
:window id
|
||||||
exwm--connection
|
:data (vector
|
||||||
(make-instance 'xcb:ewmh:set-_NET_WM_STATE
|
xcb:Atom:_NET_WM_STATE_FULLSCREEN)))
|
||||||
:window id
|
(xcb:flush exwm--connection))
|
||||||
:data (vector
|
|
||||||
xcb:Atom:_NET_WM_STATE_FULLSCREEN)))
|
|
||||||
(xcb:flush exwm--connection))))
|
|
||||||
(when buffer ;ensure it's managed
|
(when buffer ;ensure it's managed
|
||||||
(with-current-buffer buffer
|
(with-current-buffer buffer
|
||||||
;; _NET_WM_STATE_FULLSCREEN
|
;; _NET_WM_STATE_FULLSCREEN
|
||||||
|
|
Loading…
Reference in a new issue