From 1ce3f39529527e49b34df97b5edeeaa2a7ed7d21 Mon Sep 17 00:00:00 2001 From: Henrik Lissner Date: Tue, 16 May 2017 17:34:24 +0200 Subject: [PATCH] ui/doom: fix nav-flash triggers Used to trigger when evil-multiedit was invoked, or on every keypress in eshell/term buffers (both caused by eager recenter-ing). --- modules/ui/doom/config.el | 9 ++++++--- 1 file changed, 6 insertions(+), 3 deletions(-) diff --git a/modules/ui/doom/config.el b/modules/ui/doom/config.el index 8033850e9..a137fa38b 100644 --- a/modules/ui/doom/config.el +++ b/modules/ui/doom/config.el @@ -95,9 +95,12 @@ (defun doom*blink-cursor-maybe (orig-fn &rest args) "Blink line, to keep track of the cursor." (interactive) - (let ((point (point-marker))) + (let ((point (save-excursion (goto-char (window-start)) + (point-marker)))) (apply orig-fn args) - (unless (equal point (point-marker)) + (unless (equal point + (save-excursion (goto-char (window-start)) + (point-marker))) (doom/blink-cursor)))) (defun doom/blink-cursor (&rest _) @@ -112,7 +115,7 @@ #'doom/blink-cursor) (advice-add #'windmove-do-window-select :around #'doom*blink-cursor-maybe) - (advice-add #'recenter :after #'doom/blink-cursor) + (advice-add #'recenter :around #'doom*blink-cursor-maybe) (after! evil (dolist (fn '(evil-window-bottom evil-window-middle evil-window-top))