From 258604f22d2bc50480aa4eb57778ab96c97cf1c6 Mon Sep 17 00:00:00 2001 From: Eugen Wissner Date: Fri, 18 Aug 2023 07:50:18 +0200 Subject: Support repository directory in the clone function --- app/Main.hs | 2 ++ 1 file changed, 2 insertions(+) (limited to 'app/Main.hs') diff --git a/app/Main.hs b/app/Main.hs index 8d955a1..2e92865 100644 --- a/app/Main.hs +++ b/app/Main.hs @@ -36,6 +36,8 @@ main = do commit packagePath version >> pure Nothing ExistsCommand urlPath -> pure . Text.pack . show <$> remoteFileExists urlPath + ArchiveCommand repo nameVersion tarball tagPrefix -> + cloneAndArchive repo nameVersion tarball tagPrefix >> pure Nothing chooseTransformFunction (Just "php") = phpTransform chooseTransformFunction (Just "rdiff-backup") = Text.stripPrefix "v" chooseTransformFunction _ = stripPrefix "v" -- cgit v1.2.3