(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}))