emenel/doomemacs
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages 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
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) (defun doom|nlinum-hl-line (&optional line)
"Highlight line number" "Highlight line number"
(let ((line-no (or line (string-to-number (format-mode-line "%l"))))) (let ((line-no (or line (string-to-number (format-mode-line "%l")))))
(if (and nlinum-mode (not (eq line-no doom--hl-nlinum-line))) (unless doom--hl-nlinum-line
(let* ((pbol (if line (setq doom--hl-nlinum-line line-no))
(save-excursion (goto-char 1) (if (and nlinum-mode (or (not (= line-no doom--hl-nlinum-line))
(forward-line line-no) (memq this-command '(next-line previous-line
(line-beginning-position)) evil-window-bottom evil-window-top
(line-beginning-position))) evil-goto-line evil-goto-first-line))))
(let* ((pbol (line-beginning-position))
(peol (1+ pbol)) (peol (1+ pbol))
(max (point-max))) (max (point-max)))
;; Handle EOF case ;; Handle EOF case