Fix build of core with base-4.11.0
This is backwards-compatible and although there is no full ghc-8.4.3
and lts-12.9 support yet, this is useful for projects that mix in
gogol.
commitc2eba2df7ed69e35835e56f9827a224e2616d208
authorJulian Ospald <julian@capital-match.com>
dateWed 12 Sep 2018, 17:07 (8 years ago)
parent5af6dbf
core/src/Network/Google/Types.hs+4−1
@@ -305,7 +305,10 @@ data Request = Request
305305
306306instance Monoid Request where
307307 mempty = Request mempty mempty mempty mempty
308− mappend a b = Request
308+ mappend = (<>)
309+
310+instance Semigroup Request where
311+ a <> b = Request
309312 (_rqPath a <> "/" <> _rqPath b)
310313 (_rqQuery a <> _rqQuery b)
311314 (_rqHeaders a <> _rqHeaders b)