Skip to content

Instantly share code, notes, and snippets.

@d11wtq d11wtq/colorize.el
Created May 22, 2013

What would you like to do?
(defun colorize-mode-line (&rest args)
(let ((color (cond ((evil-insert-state-p) "#fa4444")
((evil-emacs-state-p) "#fafa00")
((buffer-modified-p) "#22bff0"))))
(set-face-background 'mode-line (or color "#ffffff"))))
(add-to-list 'post-command-hook 'colorize-mode-line)
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment
You can’t perform that action at this time.