From 6906b553fb8ca269822b307973fb7fe1cce968ae Mon Sep 17 00:00:00 2001 From: Alp Mestanogullari Date: Mon, 10 Aug 2015 11:44:29 +0200 Subject: [PATCH] fix another build error --- servant-server/test/Servant/ServerSpec.hs | 5 +++++ 1 file changed, 5 insertions(+) diff --git a/servant-server/test/Servant/ServerSpec.hs b/servant-server/test/Servant/ServerSpec.hs index ea437ca5..a5952b8f 100644 --- a/servant-server/test/Servant/ServerSpec.hs +++ b/servant-server/test/Servant/ServerSpec.hs @@ -1,3 +1,4 @@ +{-# LANGUAGE CPP #-} {-# LANGUAGE DataKinds #-} {-# LANGUAGE DeriveGeneric #-} {-# LANGUAGE OverloadedStrings #-} @@ -16,7 +17,11 @@ import Data.Aeson (FromJSON, ToJSON, decode', encode) import Data.ByteString (ByteString) import Data.ByteString.Conversion () import Data.Char (toUpper) +#if !MIN_VERSION_base(4,8,0) +import Data.Monoid ((<>), mempty) +#else import Data.Monoid ((<>)) +#endif import Data.Proxy (Proxy (Proxy)) import Data.String (fromString) import Data.String.Conversions (cs)