                       narf--hl-nlinum-line line-no))))))))
 
   (add-hook! nlinum-mode
-    (setq nlinum--width (length (number-to-string (count-lines (point-min) (point-max)))))))
+    (setq nlinum--width
+          (length (int-to-string (count-lines (point-min) (point-max)))))))
+
 
 ;; Mode-line ;;;;;;;;;;;;;;;;;;;;;;;;;;;
 


 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)


                 (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)))
                     (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)
