setNamespace :: String -> OptParser Opts
setNamespace p = success (\o -> o { namespace = p })
setNamespace :: String -> OptParser Opts
setNamespace p = success (\o -> o { namespace = p })
setNamespace p = success (\o -> o { namespace = p })