diff options
author | Chris Feng <chris.w.feng@gmail.com> | 2016-08-12T12·30+0800 |
---|---|---|
committer | Chris Feng <chris.w.feng@gmail.com> | 2016-08-12T12·30+0800 |
commit | 108b3949c26f55cfdb96866dedac3f68c893692f (patch) | |
tree | c68a97cf9a67066d11313c0d9278772628bcbbdf | |
parent | badf1c30a04cdc008f189c1cdef93c3db7ee7b6d (diff) |
Fix _NET_DESKTOP_VIEWPORT
* exwm-workspace.el (exwm-workspace--update-ewmh-props): * exwm.el (exwm--init-icccm-ewmh): Set _NET_DESKTOP_VIEWPORT on startup since it's a constant.
-rw-r--r-- | exwm-workspace.el | 5 | ||||
-rw-r--r-- | exwm.el | 5 |
2 files changed, 5 insertions, 5 deletions
diff --git a/exwm-workspace.el b/exwm-workspace.el index 0e078b7cc96c..77c941774407 100644 --- a/exwm-workspace.el +++ b/exwm-workspace.el @@ -1320,11 +1320,6 @@ Please check `exwm-workspace--minibuffer-own-frame-p' first." :window exwm--root :data num-workspaces)) ;; Set _NET_DESKTOP_GEOMETRY. (exwm-workspace--set-desktop-geometry) - ;; Set _NET_DESKTOP_VIEWPORT (we don't support large desktop). - (xcb:+request exwm--connection - (make-instance 'xcb:ewmh:set-_NET_DESKTOP_VIEWPORT - :window exwm--root - :data (make-vector (* 2 num-workspaces) 0))) ;; Update and set _NET_WORKAREA. (exwm-workspace--update-workareas) ;; Set _NET_VIRTUAL_ROOTS. diff --git a/exwm.el b/exwm.el index 67374430c12d..a97236786bf1 100644 --- a/exwm.el +++ b/exwm.el @@ -628,6 +628,11 @@ (xcb:+request exwm--connection (make-instance 'xcb:ewmh:set-_NET_WM_NAME :window i :data "EXWM")))) + ;; Set _NET_DESKTOP_VIEWPORT (we don't support large desktop). + (xcb:+request exwm--connection + (make-instance 'xcb:ewmh:set-_NET_DESKTOP_VIEWPORT + :window exwm--root + :data [0 0])) (xcb:flush exwm--connection)) (defun exwm--exit-icccm-ewmh () |