(include "./modules/workspaces.yuck")


(include "./modules/sys.yuck")
(include "./modules/net.yuck")
(include "./modules/clock.yuck")

(include "./windows/calendar.yuck")


(defwidget left []
  (box
    :space-evenly false
    :orientation "v"
    :halign "end"
    :valign "start"
    (workspaces)))

(defwidget right []
  (box
    :space-evenly false
    :orientation "v"
    :halign "end"
    :valign "end"
    (sys)
    (net)
    (clock)))

(defwidget center []
  (box
    :space-evenly false
    :orientation "v"
    :halign "end"
    :valign "center"
   ))

(defwidget bar-box []
  (centerbox
    :orientation "v"
    :class "bar"
    (left)
    (center)
    (right)))


(defwindow bar
    :monitor 0
    :geometry (geometry
      :x "0%"
      :y "0%"
      :width "20px"
      :height "100%"
      :anchor "right center")
    :stacking "fg"
    :exclusive true
  (bar-box))