1 files changed, 43 insertions, 0 deletions
diff --git a/.stumpwm.d/theme.lisp b/.stumpwm.d/theme.lisp
new file mode 100644
index 0000000..acd876a
--- /dev/null
+++ b/.stumpwm.d/theme.lisp
@@ -0,0 +1,43 @@
+;; Startup message
+
+(setf *startup-message* "Welcome back, Thanos")
+
+;; Colors
+(load-module "ttf-fonts")
+(load "~/.stumpwm.d/colors.lisp")
+
+(setf *message-window-gravity* :center
+      *input-window-gravity* :center
+      *window-border-style :thin
+      *mouse-focus-policy* :click
+      *float-window-modifier* :META
+      *transient-border-width* 2
+      *normal-size-border-width* 2
+      *message-window-padding*   10
+      *message-window-y-padding* 10)
+  
+(when *initializing*
+  (update-color-map (current-screen)))
+
+
+
+(set-border-color        thanos-hope)
+(set-focus-color         thanos-hope)
+(set-unfocus-color       thanos-hope-alt)
+(set-float-focus-color   thanos-hope1)
+(set-float-unfocus-color thanos-hope3)
+
+(set-fg-color thanos-hope-fg)
+(set-bg-color thanos-hope-alt)
+
+(setf swm-gaps:*head-gaps-size*  0
+      swm-gaps:*inner-gaps-size* 5
+      swm-gaps:*outer-gaps-size* 5)
+
+(when *initializing*
+  (swm-gaps:toggle-gaps-on))
+
+(ql:quickload :clx-truetype)
+
+(set-font
+ `(,(make-instance 'xft:font :family "JetBrains Mono" :subfamily "Regular" :size 12 :antialias t)))