gitback/doomemacs
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Refactor hl-line eob fix in Emacs 26+

Browse Source
This commit is contained in:
Henrik Lissner 2018-09-04 04:11:32 +02:00
parent 48c77b1126
commit 8b7404bf75
No known key found for this signature in database
GPG Key ID: 5F6C0EA160557395
1 changed files with 6 additions and 5 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

11
core/core-ui.el
View File

@ -159,14 +159,15 @@ shorter major mode name in the mode-line. See `doom|set-mode-name'.")
;; On Emacs 26+, when point is on the last line, hl-line highlights bleed into
;; the rest of the window after eob. This is the fix.
(unless (get 'display-line-numbers 'nlinum)
(when EMACS26+
(defun doom--line-range ()
(cons (line-beginning-position)
(cond ((save-excursion
(goto-char (line-end-position))
(and (eobp) (not (bolp))))
(cond ((let ((eol (line-end-position)))
(and (= eol (point-max))
(/= eol (line-beginning-position))))
(1- (line-end-position)))
((or (eobp) (save-excursion (forward-line) (eobp)))
((or (eobp)
(= (line-end-position 2) (point-max)))
(line-end-position))
((line-beginning-position 2)))))
(setq hl-line-range-function #'doom--line-range))