         (if (eq (frame-selected-window) (selected-window))
             (if (fboundp 'flycheck-has-current-errors-p)
                 (cond ((flycheck-has-current-errors-p 'error)
-                       'spacemacs-mode-line-color-error)
+                       'spacemacs-mode-line-error-face)
                       ((flycheck-has-current-errors-p 'warning)
-                       'spacemacs-mode-line-color-warning)
+                       'spacemacs-mode-line-warning-face)
                       ((flycheck-has-current-errors-p 'info)
-                       'spacemacs-mode-line-color-info)
+                       'spacemacs-mode-line-info-face)
                       (t nil))
               nil)
           nil))

        "Return the face associated to the current state."
        (spacemacs/state-color-face evil-state))

      ;; Define a face for each state
      (mapcar (lambda (x) (spacemacs/defface-state-color (car x) (cdr x)))
              '((normal . "DarkGoldenrod2")
                (insert . "chartreuse3")
                (emacs  . "SkyBlue2")
                (visual . "gray")
                (motion . "plum3")
                (lisp   . "HotPink1")))

      (defun set-default-evil-emacs-state-cursor ()
        (setq evil-emacs-state-cursor `(,(spacemacs/state-color 'emacs) box)))

                       (powerline-raw " " nil)
                       (powerline-raw "%p" nil 'r)
                       (powerline-chamfer-left nil face1)
                       ;; display hud only if necessary
                       (let ((progress (format-mode-line "%p")))
                         (if (string-match "\%" progress)
                             (powerline-hud state-face face1))))))
            (concat (powerline-render lhs)
                    (powerline-fill face2 (powerline-width rhs))
                    (powerline-render rhs))))))
