diff options
Diffstat (limited to 'src/SlackBuilder/CommandLine.hs')
| -rw-r--r-- | src/SlackBuilder/CommandLine.hs | 22 |
1 files changed, 14 insertions, 8 deletions
diff --git a/src/SlackBuilder/CommandLine.hs b/src/SlackBuilder/CommandLine.hs index 3163fb9..ee81289 100644 --- a/src/SlackBuilder/CommandLine.hs +++ b/src/SlackBuilder/CommandLine.hs @@ -14,12 +14,13 @@ import Options.Applicative , ParserInfo(..) , metavar , argument + , helper , str , info , fullDesc , subparser , command - , optional + , optional, progDesc ) data SlackBuilderCommand @@ -28,15 +29,20 @@ data SlackBuilderCommand | InstalledCommand slackBuilderParser :: ParserInfo SlackBuilderCommand -slackBuilderParser = info slackBuilderCommand fullDesc +slackBuilderParser = info (helper <*> slackBuilderCommand) fullDesc slackBuilderCommand :: Parser SlackBuilderCommand slackBuilderCommand = subparser - $ command "check" (info checkCommand mempty) - <> command "up2date" (info up2DateCommand mempty) - <> command "installed" (info installedCommand mempty) + $ command "check" checkCommand + <> command "up2date" up2DateCommand + <> command "installed" installedCommand where - checkCommand = pure CheckCommand - up2DateCommand = Up2DateCommand + checkCommand = info checkP $ progDesc "Check all configured slackbuilds for updates" + checkP = pure CheckCommand + up2DateP = Up2DateCommand <$> optional (argument str (metavar "PKGNAM")) - installedCommand = pure InstalledCommand + up2DateCommand = info up2DateP + $ progDesc "Update a single or multiple slackbuild in the configured repository" + installedCommand = info installedP + $ progDesc "Find local packages that can be updated using the configured repository" + installedP = pure InstalledCommand |