diff options
| author | Eugen Wissner <belka@caraus.de> | 2023-11-04 14:13:59 +0100 |
|---|---|---|
| committer | Eugen Wissner <belka@caraus.de> | 2023-11-04 14:13:59 +0100 |
| commit | 9770cc8829d6fdacd1ae02e1f78fcf270e5a5503 (patch) | |
| tree | 7f730f5e0708366f8eb5788acd268636825b88cc /lib/SlackBuilder/Download.hs | |
| parent | 0023fe033731180afe8bc2242c2a512b31b8c0bf (diff) | |
| download | slackbuilder-9770cc8829d6fdacd1ae02e1f78fcf270e5a5503.tar.gz | |
Remove gem and rake support files
Diffstat (limited to 'lib/SlackBuilder/Download.hs')
| -rw-r--r-- | lib/SlackBuilder/Download.hs | 17 |
1 files changed, 0 insertions, 17 deletions
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 |