From 108b3949c26f55cfdb96866dedac3f68c893692f Mon Sep 17 00:00:00 2001 From: Chris Feng Date: Fri, 12 Aug 2016 20:30:07 +0800 Subject: 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. --- exwm-workspace.el | 5 ----- 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 () -- cgit 1.4.1