                  (ov (-first (lambda (item) (overlay-get item 'nlinum)) overlays)))
             (when ov
               (narf|nlinum-unhl-line)
-              (let* ((disp (get-text-property 0 'display (overlay-get ov 'before-string)))
+              (let* ((disp (get-text-property 0 'display
+                                              (overlay-get ov 'before-string)))
                      (str (nth 1 disp)))
                 (put-text-property 0 (length str) 'face 'linum-highlight-face str)
                 (put-text-property 0 (length str) 'face 'linum-highlight-face str)


 visible-bell                    nil    ; silence of the bells
 use-dialog-box                  nil    ; avoid GUI
 redisplay-dont-pause            t
 indicate-buffer-boundaries      nil
 indicate-empty-lines            nil
 fringes-outside-margins         t      ; fringes on the other side of line numbers

 resize-mini-windows t)


  (vhl/install-extension 'my-evil-highlights)

  (vhl/define-extension 'my-undo-tree-highlights
    'undo-tree-undo 'undo-tree-redo)
  (vhl/install-extension 'my-undo-tree-highlights)
  (volatile-highlights-mode t))

(use-package nlinum
  :preface
  (defvar narf--hl-nlinum-overlay nil)
  (defvar narf--hl-nlinum-line    nil)
