From c59565ca5b0a53c96b2cb1b25cfd6ed55fc97da1 Mon Sep 17 00:00:00 2001
From: Simon Michael <simon@joyful.com>
Date: Sat, 6 Jun 2020 14:53:09 -0700
Subject: [PATCH] ;fix Json.hs with old GHCs

---
 hledger-lib/Hledger/Data/Json.hs | 5 ++++-
 1 file changed, 4 insertions(+), 1 deletion(-)

diff --git a/hledger-lib/Hledger/Data/Json.hs b/hledger-lib/Hledger/Data/Json.hs
index 483baf3b0..b69b6acfa 100644
--- a/hledger-lib/Hledger/Data/Json.hs
+++ b/hledger-lib/Hledger/Data/Json.hs
@@ -4,7 +4,7 @@ JSON instances. Should they be in Types.hs ?
 
 {-# OPTIONS_GHC -fno-warn-orphans #-}
 
---{-# LANGUAGE CPP                 #-}
+{-# LANGUAGE CPP                 #-}
 --{-# LANGUAGE DataKinds           #-}
 --{-# LANGUAGE DeriveAnyClass      #-}
 {-# LANGUAGE DeriveGeneric       #-}
@@ -33,6 +33,9 @@ module Hledger.Data.Json (
   ,readJsonFile
 ) where
 
+#if !(MIN_VERSION_base(4,13,0))
+import           Data.Semigroup ((<>))
+#endif
 import           Data.Aeson
 import           Data.Aeson.Encode.Pretty (encodePrettyToTextBuilder)
 --import           Data.Aeson.TH