replace pulse with global-hi-line-mode

This commit is contained in:
zedhugh committed 2025-03-29 05:36:18 +08:00
1 parent af323ad6d8
commit 5c12415f9e
1 file changed
+9 -6
+9 -6
View File
@@ -17,12 +17,15 @@
(with-eval-after-load 'pulse (with-eval-after-load 'pulse
(setq pulse-delay 0.04)) (setq pulse-delay 0.04))
(dolist (command '(scroll-up (let ((prefer-hl-line-mode-than-pulse t))
scroll-down (if prefer-hl-line-mode-than-pulse
recenter)) (global-hl-line-mode 1)
(advice-add command :after #'creature/pulse-line)) (progn
(add-to-list 'window-selection-change-functions #'creature/pulse-line) (dolist (command '(scroll-up
scroll-down
recenter))
(advice-add command :after #'creature/pulse-line))
(add-to-list 'window-selection-change-functions #'creature/pulse-line))))
;; address style ;; address style
(add-hook 'erc-mode-hook #'goto-address-mode) (add-hook 'erc-mode-hook #'goto-address-mode)