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

; Fix last change in exwm-randr.el

Browse source 
* exwm-randr.el (exwm-randr--init): explicitly return from
exwm-randr--init.
This commit is contained in:
Steven Allen 2024-06-09 08:14:32 -07:00
parent dd9c11125f
commit dd95ff193a
1 changed files with 2 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

3
exwm-randr.el
View file

@ -330,7 +330,8 @@ Refresh when any RandR 1.5 monitor changes."
(cl-defun exwm-randr--init () (cl-defun exwm-randr--init ()
"Initialize RandR extension and EXWM RandR module." "Initialize RandR extension and EXWM RandR module."
(exwm--log) (exwm--log)
(when exwm-randr--connection (cl-return)) (when exwm-randr--connection
(cl-return-from exwm-randr--init))
(setq exwm-randr--connection (xcb:connect)) (setq exwm-randr--connection (xcb:connect))
(set-process-query-on-exit-flag (slot-value exwm-randr--connection 'process) nil) (set-process-query-on-exit-flag (slot-value exwm-randr--connection 'process) nil)
(when (= 0 (slot-value (xcb:get-extension-data exwm-randr--connection 'xcb:randr) (when (= 0 (slot-value (xcb:get-extension-data exwm-randr--connection 'xcb:randr)