"Fix" hl-line bleeding into buffer bg (part 2)
At least highlight up to n-1's character in 2nd-to-last line, as promised.
This commit is contained in:
parent
86625d3d42
commit
c2ea4c90d9
1 changed files with 4 additions and 5 deletions
|
@ -58,12 +58,11 @@
|
||||||
(let ((bol (line-beginning-position))
|
(let ((bol (line-beginning-position))
|
||||||
(eol (line-end-position))
|
(eol (line-end-position))
|
||||||
(eob (point-max)))
|
(eob (point-max)))
|
||||||
(cond ((or (= bol eob)
|
(cond ((= bol eob)
|
||||||
(= (1+ eol) eob))
|
|
||||||
nil)
|
nil)
|
||||||
((= eol eob)
|
((= (1+ eol) eob)
|
||||||
(cons bol eol))
|
(cons bol (1- eob)))
|
||||||
((eobp)
|
((or (= eol eob) (eobp))
|
||||||
(cons bol eol))
|
(cons bol eol))
|
||||||
((cons bol (line-beginning-position 2)))))
|
((cons bol (line-beginning-position 2)))))
|
||||||
(cons (line-beginning-position)
|
(cons (line-beginning-position)
|
||||||
|
|
Loading…
Add table
Add a link
Reference in a new issue