From 86d0e16940f5b07f799591576558f1d656591de0 Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Ole=20Kr=C3=BCger?= <ole@vprsm.de>
Date: Thu, 2 Jul 2020 17:37:47 +0100
Subject: [PATCH] Add Semigroup import for GHC <= 8.2 compatibility

---
 .../src/Servant/Client/Core/ServerSentEvents.hs               | 4 ++++
 1 file changed, 4 insertions(+)

diff --git a/servant-client-core/src/Servant/Client/Core/ServerSentEvents.hs b/servant-client-core/src/Servant/Client/Core/ServerSentEvents.hs
index 26202bf6..fa6b61e9 100644
--- a/servant-client-core/src/Servant/Client/Core/ServerSentEvents.hs
+++ b/servant-client-core/src/Servant/Client/Core/ServerSentEvents.hs
@@ -51,6 +51,10 @@ import           Servant.Types.SourceT
                  (SourceT, StepT (..), foreachYieldStep, mapStepT,
                  transformStepWithAtto)
 
+-- For compatibility with GHC <= 8.2
+import           Data.Semigroup
+                 (Semigroup (..))
+
 -- | Line (or frame) of an event stream
 newtype EventStreamLine = EventStreamLine
     { unEventStreamLine :: ByteString.ByteString }