5 lines
361 B
Text
5 lines
361 B
Text
(deflisten active_profile "scripts/bar/profile")
|
|
(defwidget profile []
|
|
(button :onclick "sp-profiles next"
|
|
:class "profile ${((activeWorkspace > '30') ? 'profile-work' : ((activeWorkspace > '20') ? 'profile-school' : ((activeWorkspace > '10') ? 'profile-development' : ((activeWorkspace > '0') ? 'profile-personal' : ''))))}"
|
|
{active_profile}))
|