19 lines
558 B
Plaintext
19 lines
558 B
Plaintext
|
|
(defwidget popup-win []
|
|
(box :space-evenly false :orientation "v"
|
|
(revealer :reveal {active-panel == "sys"} :transition "slidedown" :duration 120
|
|
(sys-win))
|
|
(revealer :reveal {active-panel == "net"} :transition "slidedown" :duration 120
|
|
(net-win))
|
|
(revealer :reveal {active-panel == "clock"} :transition "slidedown" :duration 120
|
|
(clock-win))))
|
|
|
|
(defwindow popup
|
|
:monitor 0
|
|
:stacking "overlay"
|
|
:geometry (geometry
|
|
:x "0%" :y "0%"
|
|
:anchor "bottom right"
|
|
:width "320px" :height "0px")
|
|
(window (popup-win)))
|