[stumpwm] Refine modeline style

This commit is contained in:
Marcel Kapfer 2021-11-18 07:25:43 +01:00
parent 9ca85aa3c4
commit 76063e5f6f
Signed by: mmk2410
GPG Key ID: CADE6F0C09F21B09
1 changed files with 9 additions and 2 deletions

View File

@ -78,13 +78,20 @@
;; mode-line style
(setf *mode-line-background-color* "#333333"
*mode-line-foreground-color* "#cccccc"
*mode-line-border-color* "#b00045"
*mode-line-timeout* 5
*mode-line-border-width* 3
*mode-line-border-width* 0
*mode-line-pad-x* 3
*mode-line-pad-y* 3
*screen-mode-line-format* (list "[" '(:eval (RUN-SHELL-COMMAND "date '+%F %H:%M'|tr -d [:cntrl:]" T)) "] [%n] %w ^> [%B] [marcel@%h] %T"))
;; Gaps
(load-module "swm-gaps")
(setf swm-gaps:*inner-gaps-size* 5
swm-gaps:*outer-gaps-size* 5
swm-gaps:*head-gaps-size* 0)
(when *initializing*
(swm-gaps:toggle-gaps))
;; customize texts
(setf *window-format* "^B %n ^b %20t "
*group-format* "%t")