From 9770cc8829d6fdacd1ae02e1f78fcf270e5a5503 Mon Sep 17 00:00:00 2001 From: Eugen Wissner Date: Sat, 4 Nov 2023 14:13:59 +0100 Subject: Remove gem and rake support files --- lib/SlackBuilder/Download.hs | 17 ----------------- 1 file changed, 17 deletions(-) (limited to 'lib/SlackBuilder/Download.hs') diff --git a/lib/SlackBuilder/Download.hs b/lib/SlackBuilder/Download.hs index 4003afd..7729b0b 100644 --- a/lib/SlackBuilder/Download.hs +++ b/lib/SlackBuilder/Download.hs @@ -3,7 +3,6 @@ module SlackBuilder.Download , cloneAndArchive , commit , download - , downloadAndDeploy , hostedSources , remoteFileExists , updateSlackBuildVersion @@ -207,19 +206,3 @@ clone repo tarball tagPrefix = do in cloneAndArchive repo nameVersion tarballPath tagPrefix >> uploadCommand tarball remotePath >> liftIO (runConduitRes go) <&> Just - -downloadAndDeploy :: Text -> Text -> SlackBuilderT (Maybe (Digest MD5)) -downloadAndDeploy uri tarball = do - repository' <- SlackBuilderT $ asks repository - let tarballPath = Text.unpack tarball - remotePath = Text.pack $ joinPath $ ("/" :) $ drop 1 $ splitPath tarballPath - localPath = repository' tarballPath - remoteFileExists' <- remoteFileExists remotePath - - if remoteFileExists' - then - hostedSources remotePath >>= flip download localPath - else do - checksum <- liftIO (mkURI uri) >>= flip download localPath - uploadCommand tarball remotePath - pure checksum -- cgit v1.2.3