emacs-elpa-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[elpa] externals/exwm 5c9fcc0 5/7: Merge branch 'medranocalvo/fix-minibu


From: Chris Feng
Subject: [elpa] externals/exwm 5c9fcc0 5/7: Merge branch 'medranocalvo/fix-minibuffer-only-focus-jump' into externals/exwm
Date: Sun, 14 Oct 2018 06:08:24 -0400 (EDT)

branch: externals/exwm
commit 5c9fcc0cd4f26bb817f46afe8b87eb14f1d98d31
Merge: 57d0e9e c9984ca
Author: Chris Feng <address@hidden>
Commit: Chris Feng <address@hidden>

    Merge branch 'medranocalvo/fix-minibuffer-only-focus-jump' into 
externals/exwm
---
 exwm-input.el | 12 +-----------
 1 file changed, 1 insertion(+), 11 deletions(-)

diff --git a/exwm-input.el b/exwm-input.el
index e4c4f9e..6e8f6d8 100644
--- a/exwm-input.el
+++ b/exwm-input.el
@@ -351,17 +351,10 @@ ARGS are additional arguments to CALLBACK."
                 (x-focus-frame (window-frame window))
               ;; X input focus should be set on the previously selected
               ;; frame.
-              (x-focus-frame (window-frame (minibuffer-selected-window))))
+              (x-focus-frame (window-frame (minibuffer-window))))
             (exwm-input--set-active-window)
             (xcb:flush exwm--connection)))))))
 
-(defun exwm-input--on-minibuffer-setup ()
-  "Run in `minibuffer-setup-hook' to set input focus."
-  (exwm--log)
-  (unless (exwm-workspace--client-p)
-    ;; Set input focus on the Emacs frame
-    (x-focus-frame (window-frame (minibuffer-selected-window)))))
-
 (defun exwm-input--set-active-window (&optional id)
   "Set _NET_ACTIVE_WINDOW."
   (exwm--log)
@@ -1049,8 +1042,6 @@ where both ORIGINAL-KEY and SIMULATED-KEY are key 
sequences."
   (when mouse-autoselect-window
     (xcb:+event exwm--connection 'xcb:EnterNotify
                 #'exwm-input--on-EnterNotify))
-  ;; The input focus should be set on the frame when minibuffer is active.
-  (add-hook 'minibuffer-setup-hook #'exwm-input--on-minibuffer-setup)
   ;; Control `exwm-input--during-command'
   (add-hook 'pre-command-hook #'exwm-input--on-pre-command)
   (add-hook 'post-command-hook #'exwm-input--on-post-command)
@@ -1064,7 +1055,6 @@ where both ORIGINAL-KEY and SIMULATED-KEY are key 
sequences."
 (defun exwm-input--exit ()
   "Exit the input module."
   (exwm-input--unset-simulation-keys)
-  (remove-hook 'minibuffer-setup-hook #'exwm-input--on-minibuffer-setup)
   (remove-hook 'pre-command-hook #'exwm-input--on-pre-command)
   (remove-hook 'post-command-hook #'exwm-input--on-post-command)
   (remove-hook 'buffer-list-update-hook #'exwm-input--on-buffer-list-update)



reply via email to

[Prev in Thread] Current Thread [Next in Thread]