@@ -145,7 +145,7 @@ exchange c l = fmap (Auth c) . action l
145 FromClient x n -> exchangeCode x n
145 FromClient x n -> exchangeCode x n
146 FromUser u -> authorizedUserToken u Nothing
146 FromUser u -> authorizedUserToken u Nothing
148−-- | Refresh an existing 'OAuthToken' using
148+-- | Refresh an existing 'OAuthToken'.
149refresh :: forall m s. (MonadIO m, MonadCatch m, AllowScopes s)
149refresh :: forall m s. (MonadIO m, MonadCatch m, AllowScopes s)
150 => Auth s
150 => Auth s
151 -> Logger
151 -> Logger