summaryrefslogtreecommitdiff
path: root/app/SlackBuilder/CommandLine.hs
diff options
context:
space:
mode:
Diffstat (limited to 'app/SlackBuilder/CommandLine.hs')
-rw-r--r--app/SlackBuilder/CommandLine.hs7
1 files changed, 7 insertions, 0 deletions
diff --git a/app/SlackBuilder/CommandLine.hs b/app/SlackBuilder/CommandLine.hs
index 4218e6b..8df1b97 100644
--- a/app/SlackBuilder/CommandLine.hs
+++ b/app/SlackBuilder/CommandLine.hs
@@ -26,6 +26,7 @@ data SlackBuilderCommand
| SlackBuildCommand Text Text
| CommitCommand Text Text
| ExistsCommand Text
+ | ArchiveCommand Text Text String Text
deriving (Eq, Show)
data PackagistArguments = PackagistArguments
@@ -67,6 +68,7 @@ slackBuilderCommand = subparser
<> command "slackbuild" (info slackBuildCommand mempty)
<> command "commit" (info commitCommand mempty)
<> command "exists" (info existsCommand mempty)
+ <> command "archive" (info archiveCommand mempty)
where
slackBuildCommand = SlackBuildCommand
<$> argument str (metavar "PATH")
@@ -75,3 +77,8 @@ slackBuilderCommand = subparser
<$> argument str (metavar "PATH")
<*> argument str (metavar "VERSION")
existsCommand = ExistsCommand <$> argument str (metavar "PATH")
+ archiveCommand = ArchiveCommand
+ <$> argument str (metavar "REPO")
+ <*> argument str (metavar "NAME_VERSION")
+ <*> argument str (metavar "TARBALL")
+ <*> argument str (metavar "TAG_PREFIX")