(defwidget clock-small []
  (box
    :orientation "h"
    :class "clock small"
    :space-evenly false
    (label
      :class "time"
      :text "${formattime(EWW_TIME, '%I:%M')}"
    )
    (label
      :class "date"
      :text "${formattime(EWW_TIME, '%a %b %d')}"
    )
  )
)

(defwidget clock-large []
  (box
    :orientation "v"
    :class "clock large"
    :space-evenly true
    (label
      :class "time"
      :text "${formattime(EWW_TIME, '%I:%M')}"
    )
    (label
      :class "date"
      :text "${formattime(EWW_TIME, '%a %b %d')}"
    )
  )
)