                                        (mode-line . (keymap (mouse-1 . flycheck-list-errors)
                                                             (mouse-3 . flycheck-buffer))))))))
 
-(defun custom-modeline-flyspell()
+(defun custom-modeline-flyspell ()
   `(,(format " %s:%s"
              flyspell-mode-line-string
              (split-string ispell-current-dictionary "_"))))

       (propertize (format " (%s,%s,%s)" chars words lines)
                   'face `(:height 0.9))))))

(defun custom-modeline-parinfer()
  '(" "
    (:propertize
     (:eval (parinfer--lighter))

                                                            (point-max))))
    ")"))

(defun custom-modeline-size-info ()
  `(" ["
    (:propertize (-3 "%p") face font-lock-constant-face)
    "/"
    ,(propertize "%I"      'face 'font-lock-constant-face)
    "]"))

(defun custom-modeline-overwrite ()
  `(,(concat " "
             (propertize "Ovr"
                         'face      'font-lock-warning-face
