From f46144282ea845f553334a73d3e4280366af3e2b Mon Sep 17 00:00:00 2001
From: Daniel Casanueva <dhelta.diaz@gmail.com>
Date: Thu, 26 Nov 2020 18:04:25 +0100
Subject: [PATCH] GHC-8.8 compatibility.

---
 src/Data/Aeson/Filthy.hs | 2 +-
 stack.yaml               | 2 +-
 2 files changed, 2 insertions(+), 2 deletions(-)

diff --git a/src/Data/Aeson/Filthy.hs b/src/Data/Aeson/Filthy.hs
index 3bdb0bb..293719b 100644
--- a/src/Data/Aeson/Filthy.hs
+++ b/src/Data/Aeson/Filthy.hs
@@ -256,7 +256,7 @@ instance FromJSON RFC2822Time where
               -- This allows some whitespace in places it isn't allowed. Also the RFC definition of
               -- whitespace is more permissive then spaces and newlines.
               let ts = T.unpack . T.replace " " "" . T.replace "\n" "" $ t
-              in case getFirst . foldMap (\f -> parseTimeM True defaultTimeLocale f ts) $ (
+              in case getFirst . foldMap (\f -> First $ parseTimeM True defaultTimeLocale f ts) $ (
                  do -- Generate the allows RFC2822 time format following its ABNF.
                    -- The day of week is optional
                    dow  <- ["", "%a,"]
diff --git a/stack.yaml b/stack.yaml
index 1b26937..78cfa07 100644
--- a/stack.yaml
+++ b/stack.yaml
@@ -1 +1 @@
-resolver: nightly-2018-06-08
+resolver: lts-16.23