Mirrors/exwm2
2
0
Fork 0
mirror of https://github.com/emacs-exwm/exwm.git synced 2024-11-23 21:17:59 +01:00
Code Issues Projects Releases Packages Wiki Activity

Minor fix

Browse source
This commit is contained in:
Philip 2015-08-28 18:14:04 +00:00
parent 76f48490b1
commit f7bec7a977
1 changed files with 2 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

4
exwm-manage.el
View file

@ -83,7 +83,7 @@ corresponding buffer.")
:event-mask xcb:EventMask:NoEvent)) :event-mask xcb:EventMask:NoEvent))
;; The window needs to be mapped ;; The window needs to be mapped
(xcb:+request exwm--connection (xcb:+request exwm--connection
(make-instance xcb:MapWindow :window id)) (make-instance 'xcb:MapWindow :window id))
(with-slots (x y width height) exwm--geometry (with-slots (x y width height) exwm--geometry
;; Reparent to virtual root (essential) ;; Reparent to virtual root (essential)
(xcb:+request exwm--connection (xcb:+request exwm--connection
@ -323,7 +323,7 @@ corresponding buffer.")
(with-slots (parent window) obj (with-slots (parent window) obj
(if (/= exwm--root parent) (if (/= exwm--root parent)
(progn (xcb:+request exwm--connection (progn (xcb:+request exwm--connection
(make-instance xcb:MapWindow :window window)) (make-instance 'xcb:MapWindow :window window))
(xcb:flush exwm--connection)) (xcb:flush exwm--connection))
(exwm--log "MapRequest from #x%x" window) (exwm--log "MapRequest from #x%x" window)
(exwm-manage--manage-window window))))) (exwm-manage--manage-window window)))))