diff options
Diffstat (limited to 'src/SlackBuilder/CommandLine.hs')
| -rw-r--r-- | src/SlackBuilder/CommandLine.hs | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/src/SlackBuilder/CommandLine.hs b/src/SlackBuilder/CommandLine.hs index e06a40e..3163fb9 100644 --- a/src/SlackBuilder/CommandLine.hs +++ b/src/SlackBuilder/CommandLine.hs @@ -25,6 +25,7 @@ import Options.Applicative data SlackBuilderCommand = CheckCommand | Up2DateCommand (Maybe Text) + | InstalledCommand slackBuilderParser :: ParserInfo SlackBuilderCommand slackBuilderParser = info slackBuilderCommand fullDesc @@ -33,7 +34,9 @@ slackBuilderCommand :: Parser SlackBuilderCommand slackBuilderCommand = subparser $ command "check" (info checkCommand mempty) <> command "up2date" (info up2DateCommand mempty) + <> command "installed" (info installedCommand mempty) where checkCommand = pure CheckCommand up2DateCommand = Up2DateCommand <$> optional (argument str (metavar "PKGNAM")) + installedCommand = pure InstalledCommand |