(defvar reveal_powermenu false)
(defwidget powermenu []
  (revealer-on-hover
    :revealvar reveal_powermenu
    :class "powermenu ${reveal_powermenu}"
    :revealvar-name "reveal_powermenu"
    (button :onclick 'sdu power shutdown'
      :class "revealer-preview"
      :tooltip "Shutdown"
      "")
    (powermenu_children)))

(defwidget powermenu_children []
  (box :class "reveal-children"
    :orientation "h"
    :space-evenly false
    :halign "center"
    (button :onclick 'sdu power reboot'
      :tooltip "Reboot"
      "")
    (button :onclick 'sdu power suspend'
      :tooltip "Suspend"
      "󰤄")
    (button :onclick 'sdu power lock'
      :tooltip "Lock"
      "")
    (button :onclick 'sdu power logout'
      :tooltip "Logout"
      "")))