diff options
| -rw-r--r-- | lib/Web/OpenWeatherMap/Types/Location.hs | 3 |
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 |