Grooming.
parent
f66aba1c41
commit
bc5c7d3fde
|
@ -100,9 +100,9 @@ codecGotPermissionCheck = CA.object "PermissionCheck" (CAR.record { user: CA.int
|
||||||
, permission: PermissionLevel.codec })
|
, permission: PermissionLevel.codec })
|
||||||
codecGotPermissionSet :: CA.JsonCodec PermissionSet
|
codecGotPermissionSet :: CA.JsonCodec PermissionSet
|
||||||
codecGotPermissionSet = CA.object "PermissionSet" (CAR.record { user: CA.int
|
codecGotPermissionSet = CA.object "PermissionSet" (CAR.record { user: CA.int
|
||||||
, service: CA.string
|
, service: CA.string
|
||||||
, resource: CA.string
|
, resource: CA.string
|
||||||
, permission: PermissionLevel.codec })
|
, permission: PermissionLevel.codec })
|
||||||
codecGotContacts ∷ CA.JsonCodec Contacts
|
codecGotContacts ∷ CA.JsonCodec Contacts
|
||||||
codecGotContacts = CA.object "Contacts" (CAR.record { user: CA.int
|
codecGotContacts = CA.object "Contacts" (CAR.record { user: CA.int
|
||||||
, email: CAR.optional Email.codec
|
, email: CAR.optional Email.codec
|
||||||
|
|
Loading…
Reference in New Issue