mirror of
https://code.sup39.dev/repos/Wqawg
synced 2024-12-27 17:14:52 +09:00
8ac559d064
Using a dedicated type allows to record in the type the guarantees that we provide, such as scheme being HTTPS and authority being present. Allows to replace ugly `fromJust` and such with direct field access.
19 lines
297 B
Text
19 lines
297 B
Text
VerifKey
|
|
ident Text
|
|
instance InstanceId
|
|
expires UTCTime Maybe
|
|
public ByteString
|
|
sharer RemoteSharerId Maybe
|
|
|
|
UniqueVerifKey ident
|
|
|
|
RemoteSharer
|
|
ident Text
|
|
instance InstanceId
|
|
|
|
UniqueRemoteSharer ident
|
|
|
|
Instance
|
|
host Text
|
|
|
|
UniqueInstance host
|