From 2126488066713719e26a1049adb080e68ec124f1 Mon Sep 17 00:00:00 2001
From: Eugen Wissner <belka@caraus.de>
Date: Fri, 25 Aug 2023 10:30:24 +0200
Subject: Implement clone command in the binary

---
 app/SlackBuilder/CommandLine.hs | 6 ++++++
 1 file changed, 6 insertions(+)

(limited to 'app/SlackBuilder/CommandLine.hs')

diff --git a/app/SlackBuilder/CommandLine.hs b/app/SlackBuilder/CommandLine.hs
index f486b5a..1b0d7ed 100644
--- a/app/SlackBuilder/CommandLine.hs
+++ b/app/SlackBuilder/CommandLine.hs
@@ -28,6 +28,7 @@ data SlackBuilderCommand
     | ExistsCommand Text
     | ArchiveCommand Text Text String Text
     | DownloadCommand Text String
+    | CloneCommand Text Text Text
     deriving (Eq, Show)
 
 data PackagistArguments = PackagistArguments
@@ -71,6 +72,7 @@ slackBuilderCommand = subparser
     <> command "exists" (info existsCommand mempty)
     <> command "archive" (info archiveCommand mempty)
     <> command "download" (info downloadCommand mempty)
+    <> command "clone" (info cloneCommand mempty)
   where
     slackBuildCommand = SlackBuildCommand
         <$> argument str (metavar "PATH")
@@ -87,3 +89,7 @@ slackBuilderCommand = subparser
     downloadCommand = DownloadCommand
         <$> argument str (metavar "URI")
         <*> argument str (metavar "TARGET")
+    cloneCommand = CloneCommand
+        <$> argument str (metavar "REPO")
+        <*> argument str (metavar "TARBALL")
+        <*> argument str (metavar "TAG_PREFIX")
-- 
cgit v1.2.3