From 41c0d6e3e5b0bd32a82fa5d58c4877f53f241186 Mon Sep 17 00:00:00 2001 From: Tom Willemse Date: Wed, 20 Nov 2024 22:35:58 -0800 Subject: [PATCH] Initial commit --- theme.jl | 23 +++++++++++++++++++++++ 1 file changed, 23 insertions(+) create mode 100644 theme.jl diff --git a/theme.jl b/theme.jl new file mode 100644 index 0000000..922e659 --- /dev/null +++ b/theme.jl @@ -0,0 +1,23 @@ +;; Name : yoshi +;; Author : Tom Willemse +;; License : GPL-3+ + +(default-frame + `(((background . ("#111414")) (foreground "#bfbfbf" "#ff9800") (right-edge . -4) (width . 30) (height . 26) (text . "×") (x-justify . center) (y-justify . center) (top-edge . -26) (class . close-button)) + ((background . ("#111414")) (foreground "#bfbfbf" "#ff9800") (right-edge . 26) (width . 26) (height . 26) (text . "☐") (x-justify . center) (y-justify . center) (top-edge . -26) (class . maximize-button)) + ((background . ("#111414")) (foreground "#bfbfbf" "#ff9800") (right-edge . 51) (width . 26) (height . 26) (text . "_") (x-justify . center) (y-justify . center) (top-edge . -26) (class . iconify-button)) + ((background . ("#111414")) (foreground "#bfbfbf" "#ff9800") (left-edge . -4) (width . 21) (height . 26) (top-edge . -26) (class . menu-button) (text . "⮟") (x-justify . center) (y-justify . center)) + ((background . ("#222424")) (right-edge . -4) (width . 4) (top-edge . 0) (bottom-edge . 0) (class . right-border)) + ((background . ("#222424")) (left-edge . -4) (width . 4) (top-edge . 0) (bottom-edge . 0) (class . left-border)) + ((background . ("#222424")) (right-edge . 0) (left-edge . 0) (height . 4) (bottom-edge . -4) (class . bottom-border)) + ((background . ("#222424")) (left-edge . -4) (width . 4) (height . 4) (bottom-edge . -4) (class . bottom-left-corner)) + ((background . ("#222424")) (right-edge . -4) (width . 4) (height . 4) (bottom-edge . -4) (class . bottom-right-corner)) + + ((background . ("#111414")) (right-edge . 77) (left-edge . 17) (height . 26) (top-edge . -26) + (foreground . ("#bfbfbf" "#ff9800")) (text . ,window-name) (x-justify . center) (y-justify . center) (class . title)))) + + +(add-frame-style 'yoshi + (lambda (w type) + (case type + ((default) default-frame))))