keycloak-hs 0.0.0.3 → 0.0.0.4
raw patch · 2 files changed
+5/−5 lines, 2 filesPVP: major bump suggested
API removals or changes: PVP suggests a major version bump
API changes (from Hackage documentation)
- Keycloak.Types: TokenRep :: Text -> Int -> Int -> Text -> Text -> Int -> Text -> Text -> TokenRep
+ Keycloak.Types: TokenRep :: JSON -> Int -> Int -> JSON -> Text -> Int -> Text -> Text -> TokenRep
- Keycloak.Types: [accessToken] :: TokenRep -> Text
+ Keycloak.Types: [accessToken] :: TokenRep -> JSON
- Keycloak.Types: [refreshToken] :: TokenRep -> Text
+ Keycloak.Types: [refreshToken] :: TokenRep -> JSON
Files
- keycloak-hs.cabal +1/−1
- src/Keycloak/Types.hs +4/−4
keycloak-hs.cabal view
@@ -1,6 +1,6 @@ cabal-version: 1.12 name: keycloak-hs-version: 0.0.0.3+version: 0.0.0.4 description: Please see the README on GitHub at <https://github.com/cdupont/keycloak-hs#readme> homepage: https://github.com/cdupont/keycloak-hs#readme bug-reports: https://github.com/cdupont/keycloak-hs/issues
src/Keycloak/Types.hs view
@@ -22,7 +22,7 @@ import GHC.Generics (Generic) import Web.HttpApiData (FromHttpApiData(..), ToHttpApiData(..)) import Network.HTTP.Client as HC hiding (responseBody)-+import Web.JWT as JWT -- * Keycloak Monad @@ -61,7 +61,7 @@ -- | Wrapper for tokens. newtype Token = Token {unToken :: BS.ByteString} deriving (Eq, Show, Generic) --- | perser for Authorization header+-- | parser for Authorization header instance FromHttpApiData Token where parseQueryParam = parseHeader . encodeUtf8 parseHeader (extractBearerAuth -> Just tok) = Right $ Token tok@@ -109,10 +109,10 @@ -- | Token reply from Keycloak data TokenRep = TokenRep {- accessToken :: Text,+ accessToken :: JWT.JSON, expiresIn :: Int, refreshExpriresIn :: Int,- refreshToken :: Text,+ refreshToken :: JWT.JSON, tokenType :: Text, notBeforePolicy :: Int, sessionState :: Text,