urbit/pkg/arvo/sur/chat-store.hoon
2020-06-01 14:17:14 -04:00

53 lines
1023 B
Plaintext

^?
|%
+$ serial @uvH
::
+$ letter
$% [%text text=cord]
[%url url=cord]
[%code expression=cord output=(list tank)]
[%me narrative=cord]
==
::
+$ envelope
$: uid=serial
number=@
author=ship
when=time
=letter
==
::
+$ config
$: length=@
read=@
==
::
+$ mailbox
$: =config
envelopes=(list envelope)
==
::
+$ inbox (map path mailbox)
::
+$ diff
$% [%create =path] :: %create: create a mailbox at path
[%delete =path] :: %delete: delete a mailbox at path
[%message =path =envelope] :: %message: append a message to mailbox
[%read =path] :: %read: set mailbox to read
==
::
+$ action
$% :: %messages: append a list of messages to mailbox
::
[%messages =path envelopes=(list envelope)]
diff
==
::
+$ update
$% [%initial =inbox]
[%keys keys=(set path)]
[%messages =path start=@ud end=@ud envelopes=(list envelope)]
diff
==
--