mirror of
https://code.naskya.net/repos/ndqEd
synced 2025-01-10 12:16:45 +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
|