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

fix(indent-guides): bars on blank lines breaking line motions

Browse source 
Ref: jdtsmith/indent-bars#22
This commit is contained in:
Henrik Lissner 2024-09-10 19:36:11 -04:00
parent 4790db6448
commit 28d0d4c2e9
No known key found for this signature in database
GPG key ID: B60957CA074D39A3
1 changed files with 17 additions and 0 deletions
Download patch file Download diff file Expand all files Collapse all files

17
modules/ui/indent-guides/config.el
View file

@ -63,6 +63,23 @@ be enabled. If any function returns non-nil, the mode will not be activated."
(defun +indent-guides-in-childframe-p ()
(frame-parameter nil 'parent-frame)))
;; HACK: The way `indent-bars-display-on-blank-lines' functions, it places
;; text properties with a display property containing a newline, which
;; confuses `move-to-column'. This breaks `next-line' and `evil-next-line'
;; without this advice (See jdtsmith/indent-bars#22). Advising
;; `line-move-to-column' isn't enough for `move-to-column' calls in various
;; Evil operators (`evil-delete', `evil-change', etc).
(defadvice! +indent-guides--prevent-passing-newline-a (fn col &rest args)
:around #'move-to-column
(if-let* ((indent-bars-mode)
(indent-bars-display-on-blank-lines)
(nlp (line-end-position))
(dprop (get-text-property nlp 'display))
((seq-contains-p dprop ?\n))
((> col (- nlp (point)))))
(goto-char nlp)
(apply fn col args)))
;; HACK: `indent-bars-mode' interactions with some packages poorly, often
;; flooding whole sections of the buffer with indent guides. This section is
;; dedicated to fixing interop with those packages.