;ELC ;;; Compiled ;;; in Emacs version 26.3 ;;; with all optimizations. ;;; This file uses dynamic docstrings, first added in Emacs 19.29. ;;; This file does not contain utf-8 non-ASCII characters, ;;; and so can be loaded in Emacs versions earlier than 23. ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; (byte-code "\300\301!\210\302\303\304\305\306\307\310\311&\210\312\313\314\315\316DD\317\320\321%\210\312\322\314\315\323DD\324\320\321%\207" [require exwm-core custom-declare-group exwm-layout nil "Layout." :version "25.3" :group exwm custom-declare-variable exwm-layout-auto-iconify funcall function #[0 "\300\207" [t] 1] "Non-nil to automatically iconify unused X windows when possible." :type boolean exwm-layout-show-all-buffers #[0 "\300\207" [nil] 1] "Non-nil to allow switching to buffers on other workspaces."] 8) #@43 Where to place hidden floating X windows. (defconst exwm-layout--floating-hidden-position -101 (#$ . 932)) #@64 List of buffers that should not be selected by `other-buffer'. (defvar exwm-layout--other-buffer-exclude-buffers nil (#$ . 1045)) #@75 When non-nil, prevent EXWM buffers from being selected by `other-buffer'. (defvar exwm-layout--other-buffer-exclude-exwm-mode-buffers nil (#$ . 1181)) #@40 Timer used to track echo area changes. (defvar exwm-layout--timer nil (#$ . 1338)) #@30 Set WM_STATE. (fn ID STATE) (defalias 'exwm-layout--set-state #[514 "\203\306\307 \203 \202\310\311$\210\312\n\313\314\315\316\317 &\"\210r\320\f\"A\262q\210\211\211)\207" [exwm-debug exwm-debug-log-time-function exwm--connection xcb:Window:None exwm--id-buffer-alist exwm-state xcb-debug:message "%s%s: id=#x%x\n" "" "exwm-layout--set-state" xcb:-+request make-instance xcb:icccm:set-WM_STATE :window :state :icon assoc] 12 (#$ . 1427)]) #@21 (fn &optional ID) (defalias 'exwm-layout--iconic-state-p #[256 "\203\303\302\304 \"A\262\"\202\nU\207" [xcb:icccm:WM_STATE:IconicState exwm--id-buffer-alist exwm-state buffer-local-value assoc] 8 (#$ . 1891)]) #@31 Set _NET_WM_STATE. (fn XWIN) (defalias 'exwm-layout--set-ewmh-state #[257 "r\211\304\"A\262q\210\305 \306\307\310\n\311 %\")\207" [exwm--id-buffer-alist exwm--connection exwm--id exwm--ewmh-state assoc xcb:-+request make-instance xcb:ewmh:set-_NET_WM_STATE :window :data] 9 (#$ . 2118)]) (defalias 'exwm-layout--fullscreen-p #[0 "\302\303!\205  >\207" [xcb:Atom:_NET_WM_STATE_FULLSCREEN exwm--ewmh-state derived-mode-p exwm-mode] 2]) (defalias 'exwm-layout--auto-iconify #[0 "\205E ?\205E\n \f\211\205A\211@r\211Aq\210 \2039 =\2039 =\2049=\2035\306 !\210\2029\307\n!\210)A\266\202\202\f\262\266\202\207" [exwm-layout-auto-iconify exwm-transient-for exwm--id exwm-state exwm--id-buffer-alist exwm--floating-frame exwm-layout--refresh-floating exwm-layout--hide xcb:icccm:WM_STATE:NormalState] 6]) #@82 Show window ID exactly fit in the Emacs window WINDOW. (fn ID &optional WINDOW) (defalias 'exwm-layout--show #[513 "\203\306\307 \203 \202\310\311%\210\312!\211A\262\242\211A\262\242\211A\262\242Z\211A\262\242Z\313\211\211\211r\n\314\n\"A\262q\210 \203\203\315 !\262\316 !\f\\\262 \203x \317\234\262 \320\234\262\321%[#\262\321%[#\262\313\322\323 \324\"%\210\325 \203\245\326&!\327\330\"\262 \327\331\"\262\327\332\"\262\327\333\"\262\210\322     %\210\334'\335\336\337#\"\210\340 (\"\210\341)*\"*\342 !\210\343 \210)\266 \344'!\207" [exwm-debug exwm-debug-log-time-function exwm--id-buffer-alist exwm--floating-frame exwm-workspace--frame-y-offset exwm--floating-frame-position xcb-debug:message "%s%s: Show #x%x in %s\n" "" "exwm-layout--show" window-inside-absolute-pixel-edges nil assoc frame-pixel-width frame-pixel-height 0 1 + exwm--set-geometry frame-parameter exwm-container exwm-layout--fullscreen-p exwm-workspace--get-geometry slot-value x y width height xcb:-+request make-instance xcb:MapWindow :window exwm-layout--set-state delq exwm-layout--set-ewmh-state exwm-layout--auto-iconify xcb:flush exwm-layout--floating-hidden-position exwm--frame exwm--connection xcb:icccm:WM_STATE:NormalState xcb:Atom:_NET_WM_STATE_HIDDEN exwm--ewmh-state] 17 (#$ . 2943)]) #@26 Hide window ID. (fn ID) (defalias 'exwm-layout--hide #[257 "r\211\306\"A\262q\210\307 \206 \205\n\310=?\205\253 \203/\311\312\f\203*\f \202+\313\314$\210 \203[\315 \316\"\317 \320 \321\322\323#\"\324#@\325\326\327\"\326\330\"\"'\331(\211\332\211%\266\333 \321\334\335\336)\337*&\"\210\333 \321\340\335#\"\210\333 \321\334\335\336)\337\341 &\"\210\342+\"\210,\343-\"\203\232-\210\202\240\211-B-\210\344!\210\345 \210\346 !)\207" [exwm--id-buffer-alist exwm--floating-frame exwm--desktop exwm-debug exwm-debug-log-time-function exwm--connection assoc exwm-layout--iconic-state-p 4294967295 xcb-debug:message "%s%s: Hide #x%x\n" "" "exwm-layout--hide" frame-parameter exwm-container xcb:-+reply xcb:-+request-unchecked make-instance xcb:GetGeometry :drawable nil vector slot-value x y exwm--set-geometry 1 xcb:-+request xcb:ChangeWindowAttributes :window :value-mask :event-mask xcb:UnmapWindow exwm--get-client-event-mask exwm-layout--set-state memql exwm-layout--set-ewmh-state exwm-layout--auto-iconify xcb:flush exwm--floating-frame-position exwm-layout--floating-hidden-position xcb:CW:EventMask xcb:EventMask:NoEvent xcb:icccm:WM_STATE:IconicState xcb:Atom:_NET_WM_STATE_HIDDEN exwm--ewmh-state] 11 (#$ . 4291)]) #@47 Make window ID fullscreen. (fn &optional ID) (defalias 'exwm-layout-set-fullscreen #[256 "\3062\235\203\307\310 \203 \202\311\312\206\313$\210\211\204&\314\315!\203+\316 \2030\317\306\320\"\210r\211\203@\211\321\n\"A\262\202B\322 q\210\323 !\324\f\325\326\"\325\327\"\325\330\"\325\331\"%\266\332 \333\334\335\f\336\337)*\"\340\313\341+& \"\210,\342-\"\203\203-\210\202\211\211-B-\210\343!\210\344 !\210\345\346 \347\"\210\350\f!)0\207" [exwm-debug exwm-debug-log-time-function exwm--id-buffer-alist exwm--frame exwm--id exwm--connection --cl-block-exwm-layout-set-fullscreen-- xcb-debug:message "%s%s: id=#x%x\n" "" "exwm-layout-set-fullscreen" 0 derived-mode-p exwm-mode exwm-layout--fullscreen-p throw nil assoc window-buffer exwm-workspace--get-geometry exwm--set-geometry slot-value x y width height xcb:-+request make-instance xcb:ConfigureWindow :window :value-mask logior :border-width :stack-mode memql exwm-layout--set-ewmh-state xcb:flush set-window-dedicated-p get-buffer-window t exwm-input--release-keyboard xcb:ConfigWindow:BorderWidth xcb:ConfigWindow:StackMode xcb:StackMode:Above xcb:Atom:_NET_WM_STATE_FULLSCREEN exwm--ewmh-state] 13 (#$ . 5554) nil]) #@58 Restore window from fullscreen state. (fn &optional ID) (defalias 'exwm-layout-unset-fullscreen #[256 "\3062\234\203\307\310 \203 \202\311\312\206\313$\210\211\204&\314\315!\203+\316 \2040\317\306\320\"\210r\211\203@\211\321\n\"A\262\202B\322 q\210\323 \f\" \203X\324%\325 !\"\210\202\200\326&\327\330\331%\332\333'(\"\334)\335*& \"\210\336\320\337\"\211\203\324%\"\210\210\340!\210\341&!\210\342\336 \320\"\210+\343=\205\232\344%!)0\207" [exwm-debug exwm-debug-log-time-function exwm--id-buffer-alist xcb:Atom:_NET_WM_STATE_FULLSCREEN exwm--ewmh-state exwm--floating-frame --cl-block-exwm-layout-unset-fullscreen-- xcb-debug:message "%s%s: id=#x%x\n" "" "exwm-layout-unset-fullscreen" 0 derived-mode-p exwm-mode exwm-layout--fullscreen-p throw nil assoc window-buffer delq exwm-layout--show frame-root-window xcb:-+request make-instance xcb:ConfigureWindow :window :value-mask logior :sibling :stack-mode get-buffer-window t exwm-layout--set-ewmh-state xcb:flush set-window-dedicated-p line-mode exwm-input--grab-keyboard exwm--id exwm--connection xcb:ConfigWindow:Sibling xcb:ConfigWindow:StackMode exwm--guide-window xcb:StackMode:Above exwm--selected-input-mode] 13 (#$ . 6769) nil]) #@44 Toggle fullscreen mode. (fn &optional ID) (defalias 'exwm-layout-toggle-fullscreen #[256 "\3032J\203\304\305 \203 \202\306\307\206\310$\210\211\204+\311\312!\204+\313\303\314\"\210\211\205Ir\211\315\n\"A\262q\210\316 \203E\317!\202H\320!)0\207" [exwm-debug exwm-debug-log-time-function exwm--id-buffer-alist --cl-block-exwm-layout-toggle-fullscreen-- xcb-debug:message "%s%s: id=#x%x\n" "" "exwm-layout-toggle-fullscreen" 0 derived-mode-p exwm-mode throw nil assoc exwm-layout--fullscreen-p exwm-layout-unset-fullscreen exwm-layout-set-fullscreen] 6 (#$ . 8002) (byte-code "\301 \302\"@\262C\207" [exwm--id-buffer-alist window-buffer rassoc] 4)]) #@549 Return non-nil when the BUFFER may be displayed in selected frame. Prevents EXWM-mode buffers already being displayed on some other window from being selected. Should be set as `buffer-predicate' frame parameter for all frames. Used by `other-buffer'. When variable `exwm-layout--other-buffer-exclude-exwm-mode-buffers' is t EXWM buffers are never selected by `other-buffer'. When variable `exwm-layout--other-buffer-exclude-buffers' is a list of buffers, EXWM buffers belonging to that list are never selected by `other-buffer'. (fn BUFFER) (defalias 'exwm-layout--other-buffer-predicate #[257 "r\211q\210\302\303!)?\206?\205\211 >?\205\304\305\"?\207" [exwm-layout--other-buffer-exclude-exwm-mode-buffers exwm-layout--other-buffer-exclude-buffers derived-mode-p exwm-mode get-buffer-window t] 4 (#$ . 8681)]) #@32 Set _NET_CLIENT_LIST_STACKING. (defalias 'exwm-layout--set-client-list-stacking #[0 "\203\306\307 \203 \202\310\311#\210\312\211\211\211\211\n\211\203d\211@\211@\262r\211Aq\210 \f=\203V \203<B\262\202\\\313A\f\"\203MB\262\202\\B\262\202\\B\262)A\266\202\202\210\314\315\316\317\320\321\322   $!%\"\207" [exwm-debug exwm-debug-log-time-function exwm--id-buffer-alist exwm--frame exwm-workspace--current exwm--floating-frame xcb-debug:message "%s%s: \n" "" "exwm-layout--set-client-list-stacking" nil get-buffer-window xcb:-+request make-instance xcb:ewmh:set-_NET_CLIENT_LIST_STACKING :window :data vconcat append exwm--connection exwm--root] 18 (#$ . 9512)]) #@39 Refresh layout. (fn &optional FRAME) (defalias 'exwm-layout--refresh #[256 "\211\204\302 \262\203\303\304 \203 \202\305\306$\210\307!\2041\310\311\"\203-\312!\207\313!\207\314!\207" [exwm-debug exwm-debug-log-time-function selected-frame xcb-debug:message "%s%s: frame=%s\n" "" "exwm-layout--refresh" exwm-workspace--workspace-p frame-parameter exwm-outer-id exwm-layout--refresh-floating exwm-layout--refresh-other exwm-layout--refresh-workspace] 6 (#$ . 10223)]) #@43 Refresh floating frame FRAME. (fn FRAME) (defalias 'exwm-layout--refresh-floating #[257 "\203\305\306 \203 \202\307\310$\210\311!r\312!q\210\313\314!\205R\n\315 \"A\262\205R\203B\305\316 \203= \202>\307\310\n$\210\317\f!\203O\320\n\"\202R\321\n!)\207" [exwm-debug exwm-debug-log-time-function exwm--id exwm--id-buffer-alist exwm--frame xcb-debug:message "%s%s: Refresh floating %s\n" "" "exwm-layout--refresh-floating" frame-first-window window-buffer derived-mode-p exwm-mode assoc "%s%s: Refresh floating window #x%x\n" exwm-workspace--active-p exwm-layout--show exwm-layout--hide] 7 (#$ . 10714)]) #@48 Refresh client or nox frame FRAME. (fn FRAME) (defalias 'exwm-layout--refresh-other #[257 "\203\303\304 \203 \202\305\306$\210\307\310\"\311\211\211\205F\211@r\312!q\210\313\314!\203>\315!\203:\316!\210\202>\317!\210)A\266\202\202\262)\207" [exwm-debug exwm-debug-log-time-function exwm-layout--other-buffer-exclude-exwm-mode-buffers xcb-debug:message "%s%s: Refresh other %s\n" "" "exwm-layout--refresh-other" window-list nomini t window-buffer derived-mode-p exwm-mode window-prev-buffers switch-to-prev-buffer switch-to-next-buffer] 6 (#$ . 11345)]) #@44 Refresh workspace frame FRAME. (fn FRAME) (defalias 'exwm-layout--refresh-workspace #[257 "\203\306\307 \203 \202\310\311$\210\312\211\n\211\203\242\211@r\211Aq\210 \204\232\f\2040 =\203\232\313p\314#\211\204H =\203\231\315!\210\202\231\211@ =\203i\316!\203a\317\"\210\202p\315!\210\202p\320\"\210\321\322\313p\314\323#\"\"\262\324!\242\242\211\203\227r\211q\210\325\326!)\203\227\211B\262\266\210)A\266\202\202\210\211\211\203\305\211@\324!\203\272\327!\210\202\276\330!\210A\266\202\202\247\210)\323\331\314\"\211\203\211@r\332!q\210\325\326!\203\373 \204\352 =\204\373\324!\203\367\327!\210\202\373\330!\210)A\266\202\202\316\210)\333 \210\334 !\207" [exwm-debug exwm-debug-log-time-function exwm--id-buffer-alist exwm--floating-frame exwm-layout-show-all-buffers exwm--frame xcb-debug:message "%s%s: Refresh workspace %s\n" "" "exwm-layout--refresh-workspace" nil get-buffer-window-list nomini exwm-layout--hide exwm-workspace--active-p exwm-layout--show exwm-workspace-move-window append remove t window-prev-buffers derived-mode-p exwm-mode switch-to-prev-buffer switch-to-next-buffer window-list window-buffer exwm-layout--set-client-list-stacking xcb:flush exwm--id exwm-layout--other-buffer-exclude-buffers exwm-layout--other-buffer-exclude-exwm-mode-buffers exwm--connection] 15 (#$ . 11928)]) #@39 Refresh layout when minibuffer grows. (defalias 'exwm-layout--on-minibuffer-setup #[0 "\203\302\303 \203 \202\304\305#\210\306 ?\205)\307\310\311 \206#\312\313!!\313\\\314\315#\207" [exwm-debug exwm-debug-log-time-function xcb-debug:message "%s%s: \n" "" "exwm-layout--on-minibuffer-setup" exwm-workspace--client-p run-with-idle-timer float-time current-idle-time seconds-to-time 0 nil #[0 "\300\301\302 !W\205 \303 \207" [1 window-height minibuffer-window exwm-layout--refresh] 3]] 4 (#$ . 13320)]) #@96 Run when message arrives or in `echo-area-clear-hook' to refresh layout. (fn &optional DIRTY) (defalias 'exwm-layout--on-echo-area-change #[256 "\303 \205G\304 ?\205G\305\306\303 \"\204\303 G\307!V\205G \2030\310\311\n\203,\n \202-\312\313#\210\211\2037\314 \207\315\316\317 \206A\320\321!!\321\\\322\314#\207" [exwm-workspace--current exwm-debug exwm-debug-log-time-function current-message exwm-workspace--client-p cl-position 10 frame-width xcb-debug:message "%s%s: \n" "" "exwm-layout--on-echo-area-change" exwm-layout--refresh run-with-idle-timer float-time current-idle-time seconds-to-time 0 nil] 5 (#$ . 13837)]) #@470 Make the selected window DELTA pixels taller. If no argument is given, make the selected window one pixel taller. If the optional argument HORIZONTAL is non-nil, make selected window DELTA pixels wider. If DELTA is negative, shrink selected window by -DELTA pixels. Normal hints are checked and regarded if the selected window is displaying an `exwm-mode' buffer. However, this may violate the normal hints set on other X windows. (fn DELTA &optional HORIZONTAL) (defalias 'exwm-layout-enlarge-window #[513 "\203\306\307 \203 \202\310\311#\210\312U\206\221\313 \206\221\314\315!\203(\n\204@\316\317\317\320%\312U?\205\221\320\321\317\317\320%)\207\f\206\221\211\203\351\322 \323 \211\324\234\312\234ZZ\312V\203\202 \204i\\\262\202\250 Y\203u\317\262\202\250 \\\\^\262\202\250&\204\220\\\262\202\250&X\203\235\317\262\202\250&\\\\]\262\205\350\312V\205\350'\325\326#\266\327(\330\331\332\333\n\334\"\335)\336\f&\"\210\327(\330\331\332\333\n\337\"\335)\336\f&\"\210\340(!\207\341 *\\\323 \211\342\234\343\234ZZ\312V\203)+\204\\\262\202O+Y\203\317\262\202O+\\\\^\262\202O,\2047\\\262\202O,X\203D\317\262\202O,\\\\]\262\205\217\312V\205\217'\325\344#\266\327(\330\331\332\333\n\334\"\335-\345\f&\"\210\327(\330\331\332\333\n\337\"\335-\345\f&\"\210\340(!\266\204\207" [exwm-debug exwm-debug-log-time-function exwm--floating-frame window-resize-pixelwise exwm--fixed-size exwm--normal-hints-max-width xcb-debug:message "%s%s: \n" "" "exwm-layout-enlarge-window" 0 window-minibuffer-p derived-mode-p exwm-mode window-resizable nil t window-resize frame-pixel-width window-inside-pixel-edges 2 eieio-oset width xcb:-+request make-instance xcb:ConfigureWindow :window frame-parameter exwm-outer-id :value-mask :width exwm-container xcb:flush frame-pixel-height 3 1 height :height exwm--normal-hints-min-width exwm--geometry exwm--connection xcb:ConfigWindow:Width exwm-workspace--frame-y-offset exwm--normal-hints-max-height exwm--normal-hints-min-height xcb:ConfigWindow:Height] 16 (#$ . 14477) "p"]) #@98 Make the selected window DELTA pixels wider. See also `exwm-layout-enlarge-window'. (fn DELTA) (defalias 'exwm-layout-enlarge-window-horizontally #[257 "\203\302\303 \203 \202\304\305$\210\306\307\"\207" [exwm-debug exwm-debug-log-time-function xcb-debug:message "%s%s: %s\n" "" "exwm-layout-enlarge-window-horizontally" exwm-layout-enlarge-window t] 6 (#$ . 16624) "p"]) #@98 Make the selected window DELTA pixels lower. See also `exwm-layout-enlarge-window'. (fn DELTA) (defalias 'exwm-layout-shrink-window #[257 "\203\302\303 \203 \202\304\305$\210\306[!\207" [exwm-debug exwm-debug-log-time-function xcb-debug:message "%s%s: %s\n" "" "exwm-layout-shrink-window" exwm-layout-enlarge-window] 6 (#$ . 17014) "p"]) #@101 Make the selected window DELTA pixels narrower. See also `exwm-layout-enlarge-window'. (fn DELTA) (defalias 'exwm-layout-shrink-window-horizontally #[257 "\203\302\303 \203 \202\304\305$\210\306[\307\"\207" [exwm-debug exwm-debug-log-time-function xcb-debug:message "%s%s: %s\n" "" "exwm-layout-shrink-window-horizontally" exwm-layout-enlarge-window t] 6 (#$ . 17371) "p"]) #@17 Hide mode-line. (defalias 'exwm-layout-hide-mode-line #[0 "\203\306\307 \203 \202\310\311#\210\312\313!\205C\n\205C\314 \203)\315\316 !!\262\n\314 \2047\317 !\202A\320 \321 !Z\314\322$\262\207" [exwm-debug exwm-debug-log-time-function mode-line-format exwm--floating-frame exwm--mode-line-format exwm--id xcb-debug:message "%s%s: \n" "" "exwm-layout-hide-mode-line" derived-mode-p exwm-mode nil window-mode-line-height frame-root-window exwm-layout--show set-frame-height frame-pixel-height t] 6 (#$ . 17763) nil]) #@17 Show mode-line. (defalias 'exwm-layout-show-mode-line #[0 "\203\306\307 \203 \202\310\311#\210\312\313!\205B\n?\205B \314\f\204-\315 !\210\202@\316\f\317\f!\320\321\f!!\\\314\322$\210\323\324!\210\325 \207" [exwm-debug exwm-debug-log-time-function mode-line-format exwm--mode-line-format exwm--floating-frame exwm--id xcb-debug:message "%s%s: \n" "" "exwm-layout-show-mode-line" derived-mode-p exwm-mode nil exwm-layout--show set-frame-height frame-pixel-height window-mode-line-height frame-root-window t call-interactively exwm-input-grab-keyboard force-mode-line-update] 6 (#$ . 18302) nil]) #@34 Toggle the display of mode-line. (defalias 'exwm-layout-toggle-mode-line #[0 "\203\303\304 \203 \202\305\306#\210\307\310!\205\"\n\203 \311 \207\312 \207" [exwm-debug exwm-debug-log-time-function mode-line-format xcb-debug:message "%s%s: \n" "" "exwm-layout-toggle-mode-line" derived-mode-p exwm-mode exwm-layout-hide-mode-line exwm-layout-show-mode-line] 4 (#$ . 18917) nil]) #@27 Initialize layout module. (defalias 'exwm-layout--init #[0 "\203\303\304 \203 \202\305\306#\210\307\310\311\"\210\312\313!\203#\307\314\311\"\210\315 ?\205:\307\316\317\320#\210\321\322\320\323\320$\307\324\323\"\207" [exwm-debug exwm-debug-log-time-function exwm-layout--timer xcb-debug:message "%s%s: \n" "" "exwm-layout--init" add-hook window-configuration-change-hook exwm-layout--refresh fboundp window-pixel-width-before-size-change window-size-change-functions exwm-workspace--minibuffer-own-frame-p minibuffer-setup-hook exwm-layout--on-minibuffer-setup t run-with-idle-timer 0 exwm-layout--on-echo-area-change echo-area-clear-hook] 5 (#$ . 19310)]) #@25 Exit the layout module. (defalias 'exwm-layout--exit #[0 "\203\303\304 \203 \202\305\306#\210\307\310\311\"\210\312\313!\203#\307\314\311\"\210\307\315\316\"\210\n\2032\317\n!\210\320\307\321\322\"\207" [exwm-debug exwm-debug-log-time-function exwm-layout--timer xcb-debug:message "%s%s: \n" "" "exwm-layout--exit" remove-hook window-configuration-change-hook exwm-layout--refresh fboundp window-pixel-width-before-size-change window-size-change-functions minibuffer-setup-hook exwm-layout--on-minibuffer-setup cancel-timer nil echo-area-clear-hook exwm-layout--on-echo-area-change] 4 (#$ . 19985)]) (provide 'exwm-layout)