[stumpwm] use internal function for displaying time in modeline

This commit is contained in:
Marcel Kapfer 2021-11-18 18:37:11 +01:00
parent 8137f5931f
commit 3d3e001a88
Signed by: mmk2410
GPG Key ID: CADE6F0C09F21B09
1 changed files with 2 additions and 1 deletions

View File

@ -77,11 +77,12 @@
;; mode-line style
(setf *mode-line-background-color* "#333333"
*mode-line-foreground-color* "#cccccc"
*time-modeline-string* "%a %b %e %k:%M"
*mode-line-timeout* 5
*mode-line-border-width* 0
*mode-line-pad-x* 3
*mode-line-pad-y* 3
*screen-mode-line-format* (list " [%g] %w ^> [%B] [" '(:eval (RUN-SHELL-COMMAND "date '+%F %H:%M'|tr -d [:cntrl:]" T)) "] %T"))
*screen-mode-line-format* (list " [%g] %w ^> [%B] [ %d ] %T"))
;; Gaps
(load-module "swm-gaps")