(deflisten window :initial "" "sh ./widgets/window-title/get-window-title.sh")
(defwidget windowtitle []
  (box :class "title"
    (label :text {window == "null" ? "" : window} :class "title"
    )
  )
)