retrozinndev
28 lines
896 B
Plaintext
28 lines
896 B
Plaintext
|
|
(deflisten active_window :initial `{ "title": "null", "class": "null" }`
|
|
`sh ./scripts/active-window.sh`)
|
|
|
|
(defwidget window []
|
|
(box :class "window"
|
|
:visible { active_window.class == "null" ? false : true }
|
|
:vexpand false
|
|
:space-evenly false
|
|
:orientation "horizontal"
|
|
|
|
(image :class "icon"
|
|
:icon "${active_window.initialClass}"
|
|
:icon-size "toolbar")
|
|
|
|
(box :class "info"
|
|
:orientation { active_window.title == "" ? "horizontal" : "vertical" }
|
|
:space-evenly false
|
|
(label :class "window-class"
|
|
:text "${active_window.class}")
|
|
(label :class "window-title"
|
|
:text "${active_window.title}"
|
|
:visible { active_window.title != "" ? true : false }
|
|
:limit-width 45)
|
|
)
|
|
)
|
|
)
|