moreF' :: (TextF -> TextF) -> F [[Char]] (InputMsg (Int, String)) moreShellF' :: (TextF -> TextF) -> String -> F [[Char]] (InputMsg (Int, String)) pickListF' :: (TextF -> TextF) -> (a -> String) -> F (TextRequest a) (InputMsg (Int, a))
Customizable version of some fudgets