emenel/doomemacs
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity

Fix switch-window hooks when switching with the mouse

Browse source 
And moved it to ui/nav-flash, which is what this code was introduced to
fix in the first place!
This commit is contained in:
Henrik Lissner 2018-03-27 02:50:38 -04:00
parent b685baeb64
commit 2364e97285
No known key found for this signature in database
GPG key ID: 5F6C0EA160557395
2 changed files with 2 additions and 2 deletions
Download patch file Download diff file Expand all files Collapse all files

1
core/core-ui.el
View file

@ -309,7 +309,6 @@ with `doom//reload-theme').")
(run-hook-with-args 'doom-after-switch-frame-hook)))) (run-hook-with-args 'doom-after-switch-frame-hook))))
(defun doom*switch-window-hooks (orig-fn window &optional norecord) (defun doom*switch-window-hooks (orig-fn window &optional norecord)
(if (or (eq window (selected-window)) (if (or (eq window (selected-window))
(memq this-command '(mouse-set-point evil-mouse-drag-region))
(window-minibuffer-p) (window-minibuffer-p)
(window-minibuffer-p window)) (window-minibuffer-p window))
(funcall orig-fn window norecord) (funcall orig-fn window norecord)

3
modules/ui/nav-flash/autoload.el
View file

@ -16,7 +16,8 @@
(defun +nav-flash/blink-cursor (&rest _) (defun +nav-flash/blink-cursor (&rest _)
"Blink current line using `nav-flash'." "Blink current line using `nav-flash'."
(interactive) (interactive)
(unless (minibufferp) (unless (or (minibufferp)
(memq this-command '(mouse-set-point evil-mouse-drag-region)))
(nav-flash-show) (nav-flash-show)
;; only show in the current window ;; only show in the current window
(overlay-put compilation-highlight-overlay 'window (selected-window)))) (overlay-put compilation-highlight-overlay 'window (selected-window))))