7 lines
209 B
Text
7 lines
209 B
Text
(defpoll active_profile :initial false
|
|
:interval "1s"
|
|
"sp-profile-icon")
|
|
(defwidget profile []
|
|
(button :onclick "sp-profiles next"
|
|
:class "profile"
|
|
{active_profile}))
|