withInfo :: Parser a -> String -> ParserInfo a
withInfo opts desc = info opts $ progDesc desc
withInfo :: Parser a -> String -> ParserInfo a
withInfo opts desc = info opts $ progDesc desc
withInfo opts desc = info opts $ progDesc desc