replace pulse with global-hi-line-mode
This commit is contained in:
1 file changed
+5
-2
+5
-2
@@ -17,12 +17,15 @@
|
|||||||
(with-eval-after-load 'pulse
|
(with-eval-after-load 'pulse
|
||||||
(setq pulse-delay 0.04))
|
(setq pulse-delay 0.04))
|
||||||
|
|
||||||
|
(let ((prefer-hl-line-mode-than-pulse t))
|
||||||
|
(if prefer-hl-line-mode-than-pulse
|
||||||
|
(global-hl-line-mode 1)
|
||||||
|
(progn
|
||||||
(dolist (command '(scroll-up
|
(dolist (command '(scroll-up
|
||||||
scroll-down
|
scroll-down
|
||||||
recenter))
|
recenter))
|
||||||
(advice-add command :after #'creature/pulse-line))
|
(advice-add command :after #'creature/pulse-line))
|
||||||
(add-to-list 'window-selection-change-functions #'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)
|
||||||
|
|||||||
Reference in new issue
Block a user