From b1236bd52f20d1a463b6bf34c18f99c336d8d466 Mon Sep 17 00:00:00 2001
From: Lucy Cifferello <12953208+elvece@users.noreply.github.com>
Date: Tue, 19 Jan 2021 11:34:32 -0700
Subject: [PATCH] add install alert to version

---
 src/Lib/Types/AppIndex.hs | 3 +++
 1 file changed, 3 insertions(+)

diff --git a/src/Lib/Types/AppIndex.hs b/src/Lib/Types/AppIndex.hs
index 1cf6494..e939e6d 100644
--- a/src/Lib/Types/AppIndex.hs
+++ b/src/Lib/Types/AppIndex.hs
@@ -23,6 +23,7 @@ data VersionInfo = VersionInfo
     , versionInfoDependencies  :: HM.HashMap Text VersionRange
     , versionInfoOsRequired    :: VersionRange
     , versionInfoOsRecommended :: VersionRange
+    , versionInfoInstallAlert  :: Maybe Text
     }
     deriving (Eq, Show)
 
@@ -36,6 +37,7 @@ instance FromJSON VersionInfo where
         versionInfoDependencies  <- o .:? "dependencies" .!= HM.empty
         versionInfoOsRequired    <- o .:? "os-version-required" .!= Any
         versionInfoOsRecommended <- o .:? "os-version-recommended" .!= Any
+        versionInfoInstallAlert  <- o .:? "install-alert"
         pure VersionInfo { .. }
 
 instance ToJSON VersionInfo where
@@ -45,6 +47,7 @@ instance ToJSON VersionInfo where
         , "dependencies" .= versionInfoDependencies
         , "os-version-required" .= versionInfoOsRequired
         , "os-version-recommended" .= versionInfoOsRecommended
+        , "install-alert" .= versionInfoInstallAlert
         ]
 
 data StoreApp = StoreApp