Import monoid <> for older compilers

Author: Jacek Galowicz

servant-multipart-client/src/Servant/Multipart/Client.hs

@@ -29,6 +29,9 @@ import Servant.Multipart.API
 import Control.Monad (replicateM)
 import Data.Array (listArray, (!))
 import Data.List (foldl')
+#if !MIN_VERSION_base(4,11,0)
+import Data.Monoid ((<>))
+#endif
 import Data.Text.Encoding (encodeUtf8)
 import Data.Typeable
 import Network.HTTP.Media.MediaType ((//), (/:))

servant-multipart/src/Servant/Multipart.hs

@@ -45,6 +45,9 @@ import Control.Monad.IO.Class
 import Control.Monad.Trans.Resource
 import Data.List (find)
 import Data.Maybe
+#if !MIN_VERSION_base(4,11,0)
+import Data.Monoid ((<>))
+#endif
 import Data.String.Conversions (cs)
 import Data.Text (Text, unpack)
 import Data.Text.Encoding (decodeUtf8)