diff options
-rw-r--r-- | exwm-layout.el | 6 | ||||
-rw-r--r-- | exwm.el | 2 |
2 files changed, 4 insertions, 4 deletions
diff --git a/exwm-layout.el b/exwm-layout.el index c392ff972446..9cbdd2b83d30 100644 --- a/exwm-layout.el +++ b/exwm-layout.el @@ -177,7 +177,7 @@ :data (vector xcb:Atom:_NET_WM_STATE_FULLSCREEN))) (xcb:flush exwm--connection) (setq exwm--fullscreen t) - (exwm-input-release-keyboard))) + (call-interactively #'exwm-input-release-keyboard))) ;;;###autoload (defun exwm-layout-unset-fullscreen (&optional id) @@ -210,7 +210,7 @@ (make-instance 'xcb:ewmh:set-_NET_WM_STATE :window exwm--id :data [])) (xcb:flush exwm--connection) (setq exwm--fullscreen nil) - (exwm-input-grab-keyboard))) + (call-interactively #'exwm-input-grab-keyboard))) (defvar exwm-layout--fullscreen-frame-count 0 "Count the fullscreen workspace frames.") @@ -516,7 +516,7 @@ See also `exwm-layout-enlarge-window'." (window-mode-line-height (frame-root-window exwm--floating-frame))) nil t) - (exwm-input-grab-keyboard)) + (call-interactively #'exwm-input-grab-keyboard)) (force-mode-line-update))) ;;;###autoload diff --git a/exwm.el b/exwm.el index ac10247f523f..f8a3fc727200 100644 --- a/exwm.el +++ b/exwm.el @@ -80,7 +80,7 @@ (when exwm--fullscreen (exwm-layout-unset-fullscreen)) ;; Force refresh (exwm-layout--refresh) - (exwm-input-grab-keyboard)))) + (call-interactively #'exwm-input-grab-keyboard)))) (defun exwm--update-window-type (id &optional force) "Update _NET_WM_WINDOW_TYPE." |