onasty/web/src/Data/Credentials.elm(view raw)
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 |
module Data.Credentials exposing (Credentials, decode)
import Json.Decode as Decode exposing (Decoder)
type alias Credentials =
{ accessToken : String
, refreshToken : String
}
decode : Decoder Credentials
decode =
Decode.map2 Credentials
(Decode.field "access_token" Decode.string)
(Decode.field "refresh_token" Decode.string)
|