@@ -3,7 +3,6 @@ module BW where
3import Prelude
3import Prelude
5import Control.Promise (Promise)
5import Control.Promise (Promise)
6−import Data.Argonaut.Core (Json)
7import Data.Date (Date)
6import Data.Date (Date)
8import Data.List (List)
7import Data.List (List)
9import Data.Nullable (Nullable)
8import Data.Nullable (Nullable)
@@ -55,7 +54,7 @@ type ProfileOrganizationResponse = {
55 "UsersGetPremium" :: Boolean,
54 "UsersGetPremium" :: Boolean,
56 "Seats" :: Int,
55 "Seats" :: Int,
57 "MaxCollections" :: Int,
56 "MaxCollections" :: Int,
58− "MaxStorageGb" :: Int,
57+ "MaxStorageGb" :: Nullable Int,
59 "Key" :: String,
58 "Key" :: String,
60 "HasPublicAndPrivateKeys" :: Boolean,
59 "HasPublicAndPrivateKeys" :: Boolean,
61 "Status" :: OrganizationUserStatusType,
60 "Status" :: OrganizationUserStatusType,
@@ -73,9 +72,9 @@ type ProfileOrganizationResponse = {
73 "PlanProductType" :: ProductType,
72 "PlanProductType" :: ProductType,
74 "KeyConnectorEnabled" :: Boolean,
73 "KeyConnectorEnabled" :: Boolean,
75 "KeyConnectorUrl" :: String,
74 "KeyConnectorUrl" :: String,
76− "FamilySponsorshipLastSyncDate" :: Date,
75+ "FamilySponsorshipLastSyncDate" :: Nullable Date,
77− "FamilySponsorshipValidUntil" :: Date,
76+ "FamilySponsorshipValidUntil" :: Nullable Date,
78− "FamilySponsorshipToDelete" :: Boolean
77+ "FamilySponsorshipToDelete" :: Nullable Boolean
81organizationUserStatusTypeInvited = 0 :: OrganizationUserStatusType
80organizationUserStatusTypeInvited = 0 :: OrganizationUserStatusType