2020-04-25 06:51:28 +03:00
|
|
|
^?
|
2019-10-01 02:25:25 +03:00
|
|
|
|%
|
2019-10-08 20:11:18 +03:00
|
|
|
+$ serial @uvH
|
2019-10-01 02:25:25 +03:00
|
|
|
::
|
|
|
|
+$ letter
|
|
|
|
$% [%text text=cord]
|
|
|
|
[%url url=cord]
|
|
|
|
[%code expression=cord output=(list tank)]
|
2019-10-03 23:33:07 +03:00
|
|
|
[%me narrative=cord]
|
2019-10-01 02:25:25 +03:00
|
|
|
==
|
|
|
|
::
|
|
|
|
+$ envelope
|
|
|
|
$: uid=serial
|
|
|
|
number=@
|
|
|
|
author=ship
|
|
|
|
when=time
|
|
|
|
=letter
|
|
|
|
==
|
|
|
|
::
|
|
|
|
+$ config
|
2019-10-07 21:16:47 +03:00
|
|
|
$: length=@
|
2019-10-01 02:25:25 +03:00
|
|
|
read=@
|
|
|
|
==
|
|
|
|
::
|
|
|
|
+$ mailbox
|
|
|
|
$: =config
|
|
|
|
envelopes=(list envelope)
|
|
|
|
==
|
|
|
|
::
|
|
|
|
+$ inbox (map path mailbox)
|
|
|
|
::
|
2020-06-01 21:17:14 +03:00
|
|
|
+$ diff
|
2020-02-04 22:12:51 +03:00
|
|
|
$% [%create =path] :: %create: create a mailbox at path
|
2019-10-03 23:33:07 +03:00
|
|
|
[%delete =path] :: %delete: delete a mailbox at path
|
|
|
|
[%message =path =envelope] :: %message: append a message to mailbox
|
|
|
|
[%read =path] :: %read: set mailbox to read
|
2019-10-01 02:25:25 +03:00
|
|
|
==
|
|
|
|
::
|
2020-04-25 06:51:28 +03:00
|
|
|
+$ action
|
2019-11-14 03:53:47 +03:00
|
|
|
$% :: %messages: append a list of messages to mailbox
|
|
|
|
::
|
|
|
|
[%messages =path envelopes=(list envelope)]
|
2020-04-25 06:51:28 +03:00
|
|
|
diff
|
2019-11-14 03:53:47 +03:00
|
|
|
==
|
|
|
|
::
|
2020-06-01 21:17:14 +03:00
|
|
|
+$ update
|
2020-05-22 21:21:10 +03:00
|
|
|
$% [%initial =inbox]
|
|
|
|
[%keys keys=(set path)]
|
2019-11-23 01:04:36 +03:00
|
|
|
[%messages =path start=@ud end=@ud envelopes=(list envelope)]
|
2020-04-25 06:51:28 +03:00
|
|
|
diff
|
2019-10-01 02:25:25 +03:00
|
|
|
==
|
|
|
|
--
|