Provide a name for additional downloads

1 files changed, 3 insertions, 2 deletions

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
     }