summaryrefslogtreecommitdiff
path: root/app/Main.hs
diff options
context:
space:
mode:
Diffstat (limited to 'app/Main.hs')
-rw-r--r--app/Main.hs8
1 files changed, 0 insertions, 8 deletions
diff --git a/app/Main.hs b/app/Main.hs
index 5c18a7e..535b655 100644
--- a/app/Main.hs
+++ b/app/Main.hs
@@ -416,14 +416,6 @@ main = do
categories <- liftIO $ findCategory repository'
liftIO $ print $ splitFileName . makeRelative repository' <$> categories
pure Nothing
- ExistsCommand urlPath -> pure . Text.pack . show
- <$> remoteFileExists urlPath
- DownloadCommand url target
- | Just uri' <- mkURI url -> fmap (Text.pack . show)
- <$> download uri' target
- | otherwise -> pure Nothing
CloneCommand repo tarball tagPrefix -> fmap (Text.pack . show)
<$> clone repo tarball tagPrefix
- DownloadAndDeployCommand uri' tarball -> fmap (Text.pack . show)
- <$> downloadAndDeploy uri' tarball
Up2DateCommand -> up2Date >> pure Nothing