From 64233c4c635f23b2aca4d69971869a795029f3de Mon Sep 17 00:00:00 2001 From: Eugen Wissner Date: Wed, 1 Nov 2023 17:05:16 +0100 Subject: Provide a name for additional downloads --- lib/SlackBuilder/Package.hs | 5 +++-- 1 file changed, 3 insertions(+), 2 deletions(-) (limited to 'lib/SlackBuilder') diff --git a/lib/SlackBuilder/Package.hs b/lib/SlackBuilder/Package.hs index 8310858..48a15bf 100644 --- a/lib/SlackBuilder/Package.hs +++ b/lib/SlackBuilder/Package.hs @@ -17,11 +17,12 @@ import qualified Text.URI as URI import Crypto.Hash (Digest, MD5) import SlackBuilder.Trans import Control.Monad.Catch (MonadThrow) +import Data.Map (Map) -- | Contains information how a package can be updated. data Package = Package { latest :: Updater - , downloaders :: [Updater] + , downloaders :: Map Text Updater , category :: Text , name :: Text } @@ -79,5 +80,5 @@ renderDownloadWithVersion (DownloadTemplate components) version = -- | Function used to get the latest version of a source. data Updater = Updater { detectLatest :: SlackBuilderT (Maybe Text) - , getVersion :: Text -> Text -> SlackBuilderT (URI, Digest MD5) + , getVersion :: Text -> Text -> SlackBuilderT Download } -- cgit v1.2.3