Commit 2591b91b authored by Duncan Coutts's avatar Duncan Coutts

Improve the 'get' command's --help docs a bit

parent 6ebbc74d
......@@ -635,7 +635,11 @@ getCommand :: CommandUI GetFlags
getCommand = CommandUI {
commandName = "get",
commandSynopsis = "Gets a package's source code.",
commandDescription = Nothing,
commandDescription = Just $ \_ ->
"Creates a local copy of a package's source code. By default it gets "
++ "the source\ntarball and unpacks it in a local subdirectory. "
++ "Alternatively, with -s it will\nget the code from the source "
++ "repository specified by the package.\n",
commandUsage = usagePackages "get",
commandDefaultFlags = mempty,
commandOptions = \_ -> [
......@@ -647,7 +651,7 @@ getCommand = CommandUI {
(reqArgFlag "PATH")
,option "s" ["source-repository"]
"Fork the package's source repository."
"Copy the package's source repository (ie git clone, darcs get, etc as appropriate)."
getSourceRepository (\v flags -> flags { getSourceRepository = v })
(optArg "[head|this|...]" (readP_to_E (const "invalid source-repository")
(fmap (toFlag . Just) parse))
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment