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

Refactor narf|nlinum-hl-line

Browse source
This commit is contained in:
Henrik Lissner 2016-05-12 02:38:09 -04:00
parent ef4b8c5b65
commit 8a775781dc
1 changed files with 1 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

2
core/defuns/defuns-nlinum.el
View file

@ -47,7 +47,7 @@
(when (>= peol max) (when (>= peol max)
(setq peol max)) (setq peol max))
(jit-lock-fontify-now pbol peol) (jit-lock-fontify-now pbol peol)
(let ((ov (-first (lambda (item) (overlay-get item 'nlinum)) (overlays-in pbol peol)))) (let ((ov (--first (overlay-get it 'nlinum) (overlays-in pbol peol))))
(when ov (when ov
(narf|nlinum-unhl-line) (narf|nlinum-unhl-line)
(let ((str (nth 1 (get-text-property 0 'display (overlay-get ov 'before-string))))) (let ((str (nth 1 (get-text-property 0 'display (overlay-get ov 'before-string)))))