on master help sign in
wip
38d0f98iko
bw/src/BW.purs+5−2
@@ -8,8 +8,11 @@ import Data.List (List)
8import Data.Nullable (Nullable)
8import Data.Nullable (Nullable)
9import Effect (Effect)
9import Effect (Effect)
10
10
11+kdfPBKDF2_SHA256 = 0 :: KDF
12+type KDF = Int
13+
11type PreloginResponse = {
14type PreloginResponse = {
12− kdf :: Int, -- seems to be always PBKDF2_SHA256
15+ kdf :: KDF,
13 kdfIterations :: Int
16 kdfIterations :: Int
14}
17}
15
18
@@ -172,7 +175,7 @@ type ProfileProviderOrganizationResponse = {
172 keyConnectorUrl :: String,
175 keyConnectorUrl :: String,
173 familySponsorshipLastSyncDate :: Nullable Date,
176 familySponsorshipLastSyncDate :: Nullable Date,
174 familySponsorshipValidUntil :: Nullable Date,
177 familySponsorshipValidUntil :: Nullable Date,
175− familySponsorshipToDelete :: Nullable Boolean,
178+ familySponsorshipToDelete :: Nullable Boolean
176}
179}
177
180
178type Urls = {
181type Urls = {