@@ -159,7 +159,7 @@ instance {-# OVERLAPPING #-}
159159-- -- ExceptT ServantError IO (Headers ls NoContent)
160160-- clientWithRoute Proxy req baseurl = do
161161-- let method = reflectMethod (Proxy :: Proxy method)
162−-- hdrs <- performRequestNoBody method req baseurl
162+-- hdrs <- performRequestNoBody method req baseurl
163163-- return $ Headers { getResponse = NoContent
164164-- , getHeadersHList = buildHeadersTo hdrs
165165-- }
@@ -410,9 +410,9 @@ instance HasClient t m api => HasClient t m (IsSecure :> api) where
410410 clientWithRoute (Proxy :: Proxy api) q req baseurl
411411
412412instance HasClient t m subapi =>
413− HasClient t m (WithNamedConfig name config subapi) where
413+ HasClient t m (WithNamedContext name config subapi) where
414414
415− type Client t m (WithNamedConfig name config subapi) = Client t m subapi
415+ type Client t m (WithNamedContext name config subapi) = Client t m subapi
416416 clientWithRoute Proxy q = clientWithRoute (Proxy :: Proxy subapi) q
417417
418418