(defwindow test
           :monitor 0
           :geometry (geometry :x "0%"
                               :y "20px"
                               :width "10%"
                               :height "30px"
                               :anchor "top center")
           :stacking "fg"
           :reserve (struts :distance "40px" :side "top")
           :windowtype "dock"
           :wm-ignore false
  (test-widget))

(defwidget test-widget []
  "Bar")
