Fix CreateWindow attributes

; Also fix various compile warnings.

* exwm-floating.el (exwm-floating--set-floating):
* exwm-manage.el (exwm-manage--manage-window):
* exwm-systemtray.el (exwm-systemtray--init):
* exwm-workspace.el (exwm-workspace--add-frame-as-workspace)
(exwm-workspace--init):
* exwm.el (exwm--init-icccm-ewmh):
Explicitly specify the class (InputOutput or InputOnly) and for an
InputOutput X window the background pixmap when creating an X window.
This commit is contained in:
Chris Feng 2016-08-12 19:18:32 +08:00
parent 8e3fc3602f
commit db5128c1b9
5 changed files with 85 additions and 34 deletions

View file

@ -334,10 +334,17 @@ You shall use the default value if using auto-hide minibuffer.")
(setq exwm-systemtray--selection-owner-window id)
(xcb:+request exwm-systemtray--connection
(make-instance 'xcb:CreateWindow
:depth 0 :wid id :parent exwm--root
:x 0 :y 0 :width 1 :height 1
:border-width 0 :class xcb:WindowClass:InputOnly
:visual 0 :value-mask xcb:CW:OverrideRedirect
:depth 0
:wid id
:parent exwm--root
:x 0
:y 0
:width 1
:height 1
:border-width 0
:class xcb:WindowClass:InputOnly
:visual 0
:value-mask xcb:CW:OverrideRedirect
:override-redirect 1))
;; Get the selection ownership.
(xcb:+request exwm-systemtray--connection
@ -397,7 +404,7 @@ You shall use the default value if using auto-hide minibuffer.")
:width 1
:height exwm-systemtray-height
:border-width 0
:class xcb:WindowClass:CopyFromParent
:class xcb:WindowClass:InputOutput
:visual 0
:value-mask (logior xcb:CW:BackPixmap xcb:CW:EventMask)
:background-pixmap xcb:BackPixmap:ParentRelative