12 lines
342 B
Common Lisp
12 lines
342 B
Common Lisp
|
(setq *message-window-gravity* :center)
|
||
|
|
(setq *input-window-gravity* :center)
|
||
|
|
|
||
|
|
(setq *mode-line-background-color* "AntiqueWhite")
|
||
|
|
(setq *mode-line-foreground-color* "Gray20")
|
||
|
|
|
||
|
|
(setf *bar-med-color* "^b^1") ;; Red
|
||
|
|
(setf *bar-crit-color* "^b^2") ;; Green
|
||
|
|
(setf *bar-hi-color* "^b^3") ;; Yellow
|
||
|
|
|
||
|
|
(setf *mode-line-highlight-template* "(^R~A^r)")
|