From 4c06ae274bfdb9844d71b51d8a71d8d7f0cf667e Mon Sep 17 00:00:00 2001 From: Eugen Wissner Date: Sat, 17 Feb 2024 14:15:01 +0100 Subject: Find the package category automatically --- src/SlackBuilder/CommandLine.hs | 7 ++----- 1 file changed, 2 insertions(+), 5 deletions(-) (limited to 'src/SlackBuilder') diff --git a/src/SlackBuilder/CommandLine.hs b/src/SlackBuilder/CommandLine.hs index 7639327..e06a40e 100644 --- a/src/SlackBuilder/CommandLine.hs +++ b/src/SlackBuilder/CommandLine.hs @@ -23,8 +23,7 @@ import Options.Applicative ) data SlackBuilderCommand - = CategoryCommand - | CheckCommand + = CheckCommand | Up2DateCommand (Maybe Text) slackBuilderParser :: ParserInfo SlackBuilderCommand @@ -32,11 +31,9 @@ slackBuilderParser = info slackBuilderCommand fullDesc slackBuilderCommand :: Parser SlackBuilderCommand slackBuilderCommand = subparser - $ command "category" (info categoryCommand mempty) - <> command "check" (info checkCommand mempty) + $ command "check" (info checkCommand mempty) <> command "up2date" (info up2DateCommand mempty) where - categoryCommand = pure CategoryCommand checkCommand = pure CheckCommand up2DateCommand = Up2DateCommand <$> optional (argument str (metavar "PKGNAM")) -- cgit v1.2.3