@@ -8,8 +8,11 @@ import Data.List (List)
88import Data.Nullable (Nullable)
99import Effect (Effect)
1010
11+kdfPBKDF2_SHA256 = 0 :: KDF
12+type KDF = Int
13+
1114type PreloginResponse = {
12− kdf :: Int, -- seems to be always PBKDF2_SHA256
15+ kdf :: KDF,
1316 kdfIterations :: Int
1417}
1518
@@ -172,7 +175,7 @@ type ProfileProviderOrganizationResponse = {
172175 keyConnectorUrl :: String,
173176 familySponsorshipLastSyncDate :: Nullable Date,
174177 familySponsorshipValidUntil :: Nullable Date,
175− familySponsorshipToDelete :: Nullable Boolean,
178+ familySponsorshipToDelete :: Nullable Boolean
176179}
177180
178181type Urls = {