(#@+) :: UI Element -> (String,String) -> UI Element
e #@+ (k,a) = e # modify style (aListInsert k a)
(#@+) :: UI Element -> (String,String) -> UI Element
e #@+ (k,a) = e # modify style (aListInsert k a)
e #@+ (k,a) = e # modify style (aListInsert k a)