aboutsummaryrefslogtreecommitdiff
path: root/lib/Web/OpenWeatherMap/Types/Location.hs
diff options
context:
space:
mode:
Diffstat (limited to 'lib/Web/OpenWeatherMap/Types/Location.hs')
-rw-r--r--lib/Web/OpenWeatherMap/Types/Location.hs3
1 files changed, 1 insertions, 2 deletions
diff --git a/lib/Web/OpenWeatherMap/Types/Location.hs b/lib/Web/OpenWeatherMap/Types/Location.hs
index 759d292..85b4ca6 100644
--- a/lib/Web/OpenWeatherMap/Types/Location.hs
+++ b/lib/Web/OpenWeatherMap/Types/Location.hs
@@ -30,5 +30,4 @@ instance HasClient m api => HasClient m (Location :> api) where
addParams (Coord lat lon) =
appendToQueryString "lat" (Just $ toQueryParam lat) .
appendToQueryString "lon" (Just $ toQueryParam lon)
- hoistClientMonad pm _ f cl =
- \a -> hoistClientMonad pm (Proxy :: Proxy api) f (cl a)
+ hoistClientMonad pm _ f cl = hoistClientMonad pm (Proxy :: Proxy api) f . cl