initial commit

1 files changed, 16 insertions, 0 deletions

diff --git a/modeline.lisp b/modeline.lisp
new file mode 100644
index 0000000..c96a2e0
--- /dev/null
+++ b/modeline.lisp
@@ -0,0 +1,16 @@
+(defpackage #:config.modeline
+            (:use #:cl #:config #:stumpwm))
+(in-package #:config.modeline)
+
+(load-module "cpu")
+(load-module "mem")
+(load-module "stumptray")
+
+(setf *mode-line-timeout* 2)
+(setf *time-modeline-string* "%A, %F - %H:%M")
+(setf *window-format* "%n: %30t")
+
+(setf cpu::*cpu-modeline-fmt* "%c")
+
+(setf *screen-mode-line-format*
+      (list "[%n] %v ^> %C | %M | %d" (make-string 4 :initial-element #\Space)))