aboutsummaryrefslogtreecommitdiff
path: root/lib/Web/OpenWeatherMap/Types
diff options
context:
space:
mode:
authorIgor Pashev <pashev.igor@gmail.com>2020-06-28 20:21:04 +0200
committerIgor Pashev <pashev.igor@gmail.com>2020-06-28 20:21:04 +0200
commit24b77b7b78573e50cc8edb94bf1b893e0a40208c (patch)
tree6a20e9b646a46ea5e0d0a3db188129ae246bca9f /lib/Web/OpenWeatherMap/Types
parentc687a6fda58b16521256ec691eb4c07def06b27d (diff)
downloadopenweathermap-24b77b7b78573e50cc8edb94bf1b893e0a40208c.tar.gz
Eliminate lambda
Diffstat (limited to 'lib/Web/OpenWeatherMap/Types')
-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