summaryrefslogtreecommitdiff
path: root/app/Main.hs
diff options
context:
space:
mode:
Diffstat (limited to 'app/Main.hs')
-rw-r--r--app/Main.hs4
1 files changed, 0 insertions, 4 deletions
diff --git a/app/Main.hs b/app/Main.hs
index 0337fba..5c18a7e 100644
--- a/app/Main.hs
+++ b/app/Main.hs
@@ -416,12 +416,8 @@ main = do
categories <- liftIO $ findCategory repository'
liftIO $ print $ splitFileName . makeRelative repository' <$> categories
pure Nothing
- CommitCommand packagePath version ->
- 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
DownloadCommand url target
| Just uri' <- mkURI url -> fmap (Text.pack . show)
<$> download uri' target