From 7cea1859d427a553e6195fba9fc19e56f3fd26ea Mon Sep 17 00:00:00 2001
From: jao <jao@gnu.org>
Date: Mon, 26 Sep 2022 04:26:01 +0100
Subject: pulsar tweaks

---
 init.el | 49 +++++++++++++++----------------------------------
 1 file changed, 15 insertions(+), 34 deletions(-)

(limited to 'init.el')

diff --git a/init.el b/init.el
index 76993c7..b89b210 100644
--- a/init.el
+++ b/init.el
@@ -569,40 +569,21 @@
   (setq tmr-sound-file "/usr/share/sounds/freedesktop/stereo/message.oga"))
 
 ;;;; pulsar
-(when window-system
-  (use-package pulsar
-    :ensure t
-    :diminish
-    :custom ((pulsar-pulse-functions
-              '(ace-window
-                backward-page
-                delete-other-windows
-                delete-window
-                forward-page
-                jao-prev-window
-                move-to-window-line-top-bottom
-                org-backward-heading-same-level
-                org-forward-heading-same-level
-                org-next-visible-heading
-                org-previous-visible-heading
-                other-window
-                outline-backward-same-level
-                outline-forward-same-level
-                outline-next-visible-heading
-                outline-previous-visible-heading
-                outline-up-heading
-                recenter-top-bottom
-                reposition-window
-                scroll-down-command
-                scroll-up-command))
-             (pulsar-pulse t)
-             (pulsar-delay 0.1)
-             (pulsar-iterations 10)
-             (pulsar-face 'pulsar-yellow)
-             (pulsar-highlight-face 'jao-themes--hilite))
-    :hook ((jao-afio-switch . pulsar-pulse-line)))
-  (pulsar-global-mode))
-
+(use-package pulsar
+  :ensure t
+  :diminish
+  :custom ((pulsar-pulse t)
+           (pulsar-delay 0.1)
+           (pulsar-iterations 10)
+           (pulsar-face 'pulsar-yellow)
+           (pulsar-highlight-face 'jao-themes--hilite))
+  :config (add-to-list 'pulsar-pulse-functions 'jao-prev-window)
+  :hook ((jao-afio-switch . pulsar-pulse-line)
+         (consult-after-jump . pulsar-recenter-top)
+         (consult-after-jump . pulsar-reveal-entry)
+         (imenu-after-jump . pulsar-recenter-top)
+         (imenu-after-jump . pulsar-reveal-entry)
+         (next-error . pulsar-pulse-line)))
 
 ;;; Calendar, diary, weather
 ;;;; diary
-- 
cgit v1.2.3