maurice/snix
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

subtree(3p/exwm): Update to commit 'e43bd782'

Browse source 
Change-Id: I832c4d7f26e8fa4a2d7c3f26a81ba981ebbc1d8c
This commit is contained in:
Vincent Ambo 2022-03-30 11:25:25 +02:00
commit 79d1345012
3 changed files with 711 additions and 4 deletions
Download patch file Download diff file Expand all files Collapse all files

15
third_party/exwm/exwm-core.el vendored
View file

@ -193,6 +193,21 @@ least SECS seconds later."
(lsh (lsh (pop rgb) -8) 8)
(lsh (pop rgb) -8)))))
(defun exwm--get-visual-depth-colormap (conn id)
"Get visual, depth and colormap from X window ID.
Return a three element list with the respective results."
(let (ret-visual ret-depth ret-colormap)
(with-slots (visual colormap)
(xcb:+request-unchecked+reply conn
(make-instance 'xcb:GetWindowAttributes :window id))
(setq ret-visual visual)
(setq ret-colormap colormap))
(with-slots (depth)
(xcb:+request-unchecked+reply conn
(make-instance 'xcb:GetGeometry :drawable id))
(setq ret-depth depth))
(list ret-visual ret-depth ret-colormap)))
;; Internal variables
(defvar-local exwm--id nil) ;window ID
(defvar-local exwm--configurations nil) ;initial configurations.