2024-05-10 16:35:43 +02:00
|
|
|
(deflisten window :initial "" "sh ./widgets/window-title/get-window-title.sh")
|
|
|
|
|
(defwidget windowtitle []
|
2024-07-29 18:04:01 +02:00
|
|
|
(box :class "title" :visible {window == "null" ? false : true}
|
2024-05-10 16:35:43 +02:00
|
|
|
(label :text {window == "null" ? "" : window} :class "title"
|
|
|
|
|
)
|
|
|
|
|
)
|
|
|
|
|
)
|
