From d5df676df7a9bea716fdbdaff455fa1ab57073ac Mon Sep 17 00:00:00 2001 From: Eugen Wissner Date: Tue, 3 Oct 2023 18:53:41 +0200 Subject: Add module with an info file parser --- app/Main.hs | 21 +++++++++++++++++++-- 1 file changed, 19 insertions(+), 2 deletions(-) (limited to 'app/Main.hs') diff --git a/app/Main.hs b/app/Main.hs index c82a4e9..e8cd335 100644 --- a/app/Main.hs +++ b/app/Main.hs @@ -70,6 +70,25 @@ autoUpdatable = , requires = mempty , reupload = False } + , Package + { latest = + let ghArguments = GhArguments + { owner = "jitsi" + , name = "jitsi-meet-electron" + , transform = Nothing + } + latest' = latestGitHub ghArguments $ Text.stripPrefix "v" + template = Package.DownloadTemplate + $ Package.StaticPlaceholder "https://github.com/jitsi/jitsi-meet-electron/releases/download/v" + :| Package.VersionPlaceholder + : [Package.StaticPlaceholder "/jitsi-meet-x86_64.AppImage"] + in Package.Updater latest' template + , category = "network" + , name = "jitsi-meet-desktop" + , homepage = Just [uri|https://jitsi.org/|] + , requires = mempty + , reupload = False + } ] up2Date :: SlackBuilderT () @@ -134,8 +153,6 @@ main = do Text.IO.putStrLn $ fromMaybe "" latestVersion where executeCommand = \case - PackagistCommand packagistArguments -> - latestPackagist packagistArguments TextCommand textArguments -> latestText textArguments GhCommand ghArguments@GhArguments{ transform } -> latestGitHub ghArguments $ chooseTransformFunction transform -- cgit v1.2.3