This repository has been archived on 2021-07-31. You can view files and clone it, but cannot push or open issues or pull requests.
.stumpwm.d/modeline.lisp

28 lines
939 B
Common Lisp

(defvar phundrak-nord0 "#2e3440")
(defvar phundrak-nord1 "#3b4252")
(defvar phundrak-nord2 "#434c5e")
(defvar phundrak-nord3 "#4c566a")
(defvar phundrak-nord4 "#d8dee9")
(defvar phundrak-nord5 "#e5e9f0")
(defvar phundrak-nord6 "#eceff4")
(defvar phundrak-nord7 "#8fbcbb")
(defvar phundrak-nord8 "#88c0d0")
(defvar phundrak-nord9 "#81a1c1")
(defvar phundrak-nord10 "#5e81ac")
(defvar phundrak-nord11 "#bf616a")
(defvar phundrak-nord12 "#d08770")
(defvar phundrak-nord13 "#ebcb8b")
(defvar phundrak-nord14 "#a3be8c")
(defvar phundrak-nord15 "#b48ead")
(setf
*mode-line-background-color* phundrak-nord1
*mode-line-foreground-color* phundrak-nord5
*mode-line-border-color* phundrak-nord1
*mode-line-border-width* 0
*mode-line-timeout* 1
*group-format* " %t "
*time-modeline-string* "%H:%M"
*window-format* "<%n:%25t>"
*screen-mode-line-format* (list "%g %v ^> ⏲ %d"))