Add shaded/shaped frame type

This commit is contained in:
Tom Willemse 2024-11-22 07:35:23 -08:00
parent 988d29165e
commit 10ff4d93d6

View file

@ -2,30 +2,35 @@
;; Author : Tom Willemse <tom@ryuslash.org>
;; License : GPL-3+
(let* (
(let* ((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 . -5) (width . 5) (top-edge . 0) (bottom-edge . 0) (class . right-border))
((background . ("#222424")) (left-edge . -5) (width . 5) (top-edge . 0) (bottom-edge . 0) (class . left-border))
((background . ("#111414")) (right-edge . 0) (left-edge . 0) (height . 5) (bottom-edge . -5) (class . bottom-border))
((background . ("#111414")) (left-edge . -5) (width . 5) (height . 5) (bottom-edge . -5) (class . bottom-left-corner))
((background . ("#111414")) (right-edge . -5) (width . 5) (height . 5) (bottom-edge . -5) (class . bottom-right-corner))
(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 . -5) (width . 5) (top-edge . 0) (bottom-edge . 0) (class . right-border))
((background . ("#222424")) (left-edge . -5) (width . 5) (top-edge . 0) (bottom-edge . 0) (class . left-border))
((background . ("#111414")) (right-edge . 0) (left-edge . 0) (height . 5) (bottom-edge . -5) (class . bottom-border))
((background . ("#111414")) (left-edge . -5) (width . 5) (height . 5) (bottom-edge . -5) (class . bottom-left-corner))
((background . ("#111414")) (right-edge . -5) (width . 5) (height . 5) (bottom-edge . -5) (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))))
((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))
)
))
(shaded-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 . ("#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)
((shaped) shaded-frame)
)
)
)