textF' :: Customiser TextF -> F TextRequest (InputMsg (Int, String)) data TextF instance HasAlign TextF instance HasBgColorSpec TextF instance HasBorderWidth TextF instance HasFgColorSpec TextF instance HasFont TextF instance HasInitText TextF instance HasMargin TextF instance HasSizing TextF instance HasStretchable TextF class HasInitText a where setInitText :: [String] -> Customiser a getInitText :: a -> [String] getInitTextMaybe :: a -> Maybe [String] instance HasInitText TextF
