Ver a proveniência

update modeline color pref

pull/1/head
10sr há 12 anos
ascendente
cometimento
9ba36aefec
1 ficheiros alterados com 5 adições e 1 eliminações
  1. +5
    -1
      emacs.el

+ 5
- 1
emacs.el Ver ficheiro

@@ -337,9 +337,13 @@
(setq my-set-mode-line-color-state state))))
(defvar my-set-mode-line-color-color nil "")
(setq my-set-mode-line-color-color
(if window-system
`((readonly "white" "blue")
(overwrite "white" "red")
(insert ,(face-foreground 'modeline) ,(face-background 'modeline)))
`((readonly "blue" "white")
(overwrite "red" "white")
(insert ,(face-foreground 'modeline) ,(face-background 'modeline))))
(insert ,(face-foreground 'modeline) ,(face-background 'modeline)))))
(defvar my-set-mode-line-color-state nil "")
(add-hook 'post-command-hook 'my-set-mode-line-color-read-only)
(add-hook 'after-init-hook 'my-set-mode-line-color-read-only)


Carregando…
Cancelar
Guardar