25 lines
449 B
Text
25 lines
449 B
Text
;status bar
|
|
|
|
(defwindow bar
|
|
:windowtype "dock"
|
|
:exclusive true
|
|
:geometry (geometry :x "0%"
|
|
:y "0%"
|
|
:width "100%"
|
|
:height "30px"
|
|
:anchor "top center")
|
|
:reserve (struts :side "top" :distance "4%")
|
|
(bar))
|
|
|
|
;desktop widgets
|
|
|
|
(defwindow widgets
|
|
:windowtype "normal"
|
|
:exclusive false
|
|
:geometry (geometry :x "10px"
|
|
:y "10px"
|
|
:width "10px"
|
|
:height "10px"
|
|
:anchor "top left")
|
|
:stacking "bottom"
|
|
(widgets))
|