(#.++) :: UI Element -> [String] -> UI Element
e #.++ cs = e # modify class_ (L.union cs)
(#.++) :: UI Element -> [String] -> UI Element
e #.++ cs = e # modify class_ (L.union cs)
e #.++ cs = e # modify class_ (L.union cs)