mirror of
https://github.com/urbit/shrub.git
synced 2024-12-30 07:35:19 +03:00
48 lines
896 B
Plaintext
48 lines
896 B
Plaintext
|
/- *write
|
||
|
/+ *write, elem-to-react-json
|
||
|
|_ rum=rumor
|
||
|
++ grab
|
||
|
|%
|
||
|
++ noun rumor
|
||
|
--
|
||
|
++ grow
|
||
|
|%
|
||
|
++ noun rum
|
||
|
++ json
|
||
|
=, enjs:format
|
||
|
%+ frond -.rum
|
||
|
?- -.rum
|
||
|
%collection
|
||
|
%- pairs
|
||
|
:~ [%coll s+col.rum]
|
||
|
[%who (ship who.rum)]
|
||
|
[%data (collection-build-to-json dat.rum)]
|
||
|
==
|
||
|
::
|
||
|
%post
|
||
|
%- pairs
|
||
|
:~ [%coll s+col.rum]
|
||
|
[%post s+pos.rum]
|
||
|
[%who (ship who.rum)]
|
||
|
[%data (post-build-to-json dat.rum)]
|
||
|
==
|
||
|
::
|
||
|
%comments
|
||
|
%- pairs
|
||
|
:~ [%coll s+col.rum]
|
||
|
[%post s+pos.rum]
|
||
|
[%who (ship who.rum)]
|
||
|
[%data (comment-build-to-json dat.rum)]
|
||
|
==
|
||
|
::
|
||
|
%total
|
||
|
%- pairs
|
||
|
:~ [%coll s+col.rum]
|
||
|
[%who (ship who.rum)]
|
||
|
[%data (total-build-to-json dat.rum)]
|
||
|
==
|
||
|
==
|
||
|
::
|
||
|
--
|
||
|
--
|