Update emacs.org

This commit is contained in:
Sakooooo 2023-12-15 12:30:28 +04:00 committed by GitHub
parent 1df7c8d9da
commit 50937e4cf0
No known key found for this signature in database
GPG key ID: 4AEE18F83AFDEB23

View file

@ -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