summaryrefslogtreecommitdiff
path: root/app/Main.hs
diff options
context:
space:
mode:
Diffstat (limited to 'app/Main.hs')
-rw-r--r--app/Main.hs10
1 files changed, 9 insertions, 1 deletions
diff --git a/app/Main.hs b/app/Main.hs
index 9d3da09..5954918 100644
--- a/app/Main.hs
+++ b/app/Main.hs
@@ -273,7 +273,15 @@ updatePackageIfRequired package@Package{..} version = do
Text.IO.putStrLn
$ name <> " is up to date (Version " <> version <> ")."
setSGR [Reset]
- | otherwise -> updatePackage package parsedInfoFile version
+ | otherwise -> do
+ liftIO $ do
+ setSGR [SetColor Foreground Dull Yellow]
+ Text.IO.putStrLn
+ $ "A new version of "
+ <> name <> " " <> getField @"version" parsedInfoFile
+ <> " is available (" <> version <> ")."
+ setSGR [Reset]
+ updatePackage package parsedInfoFile version
Left errorBundle -> liftIO $ putStr $ errorBundlePretty errorBundle
updateDownload :: Package -> Package.Updater -> SlackBuilderT (URI, Digest MD5)