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

Make doom|nlinum-hl-line slightly more reliable

Browse Source
This commit is contained in:
Henrik Lissner 2016-06-05 23:14:09 -04:00
parent caae5946cf
commit d69828101e
1 changed files with 7 additions and 6 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

13
core/defuns/defuns-nlinum.el
View File

@ -35,12 +35,13 @@
(defun doom|nlinum-hl-line (&optional line)
"Highlight line number"
(let ((line-no (or line (string-to-number (format-mode-line "%l")))))
(if (and nlinum-mode (not (eq line-no doom--hl-nlinum-line)))
(let* ((pbol (if line
(save-excursion (goto-char 1)
(forward-line line-no)
(line-beginning-position))
(line-beginning-position)))
(unless doom--hl-nlinum-line
(setq doom--hl-nlinum-line line-no))
(if (and nlinum-mode (or (not (= line-no doom--hl-nlinum-line))
(memq this-command '(next-line previous-line
evil-window-bottom evil-window-top
evil-goto-line evil-goto-first-line))))
(let* ((pbol (line-beginning-position))
(peol (1+ pbol))
(max (point-max)))
;; Handle EOF case