                 mode-line-process
                 (:eval (custom-modeline-region-info))
                 vc-mode
-                (flycheck-mode flycheck-mode-line)
+                (:eval (custom-modeline-flycheck))
                 (iedit-mode (:eval
                              (if (= (iedit-counter) 0)
                                  ""

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

(setq-default mode-line-format
              '(""
                mode-line-front-space
                (:eval (if (eq defining-kbd-macro t)
                           (concat (propertize "[M]" 'face 'rec-face) " ")))

                (org-agenda-mode (:eval (format "%s" org-agenda-filter)))
                " "
                ;; mode-line-modes
                (:eval (custom-modeline-overwrite))
                (:eval (if overwrite-mode " " ""))

                mode-line-misc-info
                "::"
                mode-line-position
