summaryrefslogtreecommitdiff
path: root/app/Main.hs
diff options
context:
space:
mode:
authorEugen Wissner <belka@caraus.de>2023-08-17 22:07:09 +0200
committerEugen Wissner <belka@caraus.de>2023-08-17 22:07:09 +0200
commitfd649b66f57123aad95861e636299a2d0a5ca6f7 (patch)
treefcdfa433ed9d80d0b00ddccbdc56955ca4b7cd1a /app/Main.hs
parent6b15ccd0f53c7ffd57820fb15664ecadee74392a (diff)
downloadslackbuilder-fd649b66f57123aad95861e636299a2d0a5ca6f7.tar.gz
Implement remote file check as Haskell command
Diffstat (limited to 'app/Main.hs')
-rw-r--r--app/Main.hs2
1 files changed, 2 insertions, 0 deletions
diff --git a/app/Main.hs b/app/Main.hs
index a90d19a..8d955a1 100644
--- a/app/Main.hs
+++ b/app/Main.hs
@@ -34,6 +34,8 @@ main = do
updateSlackBuildVersion packagePath version >> pure Nothing
CommitCommand packagePath version ->
commit packagePath version >> pure Nothing
+ ExistsCommand urlPath -> pure . Text.pack . show
+ <$> remoteFileExists urlPath
chooseTransformFunction (Just "php") = phpTransform
chooseTransformFunction (Just "rdiff-backup") = Text.stripPrefix "v"
chooseTransformFunction _ = stripPrefix "v"