Update emacs.org
This commit is contained in:
parent
1df7c8d9da
commit
50937e4cf0
|
@ -183,15 +183,39 @@ Should make startup faster, taken from doom-emacs
|
||||||
#+begin_src emacs-lisp
|
#+begin_src emacs-lisp
|
||||||
(setq-default mode-line-format
|
(setq-default mode-line-format
|
||||||
`("%e"
|
`("%e"
|
||||||
" "
|
;; begin EVIL state
|
||||||
(:eval (cond
|
(:eval (cond
|
||||||
((eq evil-state 'visual) "")
|
((eq evil-state 'visual) (propertize " VISUAL "
|
||||||
((eq evil-state 'normal) "")
|
'face '(:background "#6600cc"
|
||||||
((eq evil-state 'insert) "")
|
:foreground "#000000")))
|
||||||
((eq evil-state 'emacs) "")
|
((eq evil-state 'normal) (propertize " NORMAL "
|
||||||
((eq evil-state 'yank) "")))
|
'face '(:background "#99ff99" :foreground "#000000")))
|
||||||
" "
|
((eq evil-state 'insert) (propertize " INSERT "
|
||||||
(:eval (buffer-name))
|
'face '(:background "#00cc66"
|
||||||
|
:foreground "#000000")))
|
||||||
|
((eq evil-state 'emacs) (propertize " EMACS "
|
||||||
|
'face '(:background "#9900ff"
|
||||||
|
:foreground "#000000")))
|
||||||
|
((eq evil-state 'yank) (propertize " YANK "
|
||||||
|
'face '(:background "#ffff00"
|
||||||
|
:foreground "#000000")))
|
||||||
|
|
||||||
|
((eq evil-state 'delete) (propertize " DELETE "
|
||||||
|
'face '(:background "#ff3300"
|
||||||
|
:foreground "#000000")))
|
||||||
|
|
||||||
|
))
|
||||||
|
;; end EVIL state
|
||||||
|
|
||||||
|
;; begin BUFFER name
|
||||||
|
" "
|
||||||
|
|
||||||
|
(:eval (propertize (buffer-name)
|
||||||
|
'face '(:foreground "#669999")))
|
||||||
|
|
||||||
|
" "
|
||||||
|
;; end BUFFER name
|
||||||
|
|
||||||
))
|
))
|
||||||
#+end_src
|
#+end_src
|
||||||
* Packages
|
* Packages
|
||||||
|
|
Loading…
Reference in a new issue