From b77fb36d5186bc0dd590fb6178b0848e53f3a2ac Mon Sep 17 00:00:00 2001
From: pacien <pacien.trangirard@pacien.net>
Date: Tue, 12 May 2020 18:24:12 +0200
Subject: [PATCH] Update resolver to latest LTS-15.12

This patch allows the project to build on the latest Stackage LTS.
---
 app/Main.hs | 2 ++
 stack.yaml  | 2 +-
 2 files changed, 3 insertions(+), 1 deletion(-)

diff --git a/app/Main.hs b/app/Main.hs
index aa55c61..b371f36 100644
--- a/app/Main.hs
+++ b/app/Main.hs
@@ -27,11 +27,13 @@ loadArt =
 main :: IO ()
 main = do
   let loadVty = standardIOConfig >>= mkVty
+  initialVty                <- loadVty
   bChan                     <- newBChan 10
   art'                      <- loadArt
   timeMultiplier            <- newMVar 1
   (NE.fromList -> wordList) <- T.words <$> TIO.readFile "word-list.txt"
   withAsync (timer timeMultiplier bChan) . const . void $ customMain
+    initialVty
     loadVty
     (Just bChan)
     app
diff --git a/stack.yaml b/stack.yaml
index 484d032..e4ee54f 100644
--- a/stack.yaml
+++ b/stack.yaml
@@ -17,7 +17,7 @@
 #
 # resolver: ./custom-snapshot.yaml
 # resolver: https://example.com/snapshots/2018-01-01.yaml
-resolver: lts-12.14
+resolver: lts-15.12
 
 # User packages to be built.
 # Various formats can be used as shown in the example below.