(#.+) :: UI Element -> String -> UI Element
e #.+ c = e # modify class_ (L.insert c)
(#.+) :: UI Element -> String -> UI Element
e #.+ c = e # modify class_ (L.insert c)
e #.+ c = e # modify class_ (L.insert c)