shrub/mar/womb/invite.hoon

34 lines
749 B
Plaintext

::
:::: /hoon/stat-all/womb/mar
::
/? 310
/+ hood-womb, old-zuse
::
:::: ~fyr
::
=* invite invite:hood-womb
=* reference reference:hood-womb
=, old-zuse
|_ {cord reference invite}
::
++ grab :: convert from
|%
++ noun {cord reference invite} :: clam from %noun
++ json
|= jon/^json ^- {cord reference invite}
%- need
%. jon
=> jo
=/ mail
;~ simu
;~(pfix (plus ;~(less vat next)) vat)
(cook crip (star ;~(less ace prn)))
==
%- ot :~
tid+so
ref+(mu (su (pick ;~(pfix sig fed:ag) mail)))
inv+(ot who+(su mail) pla+ni sta+ni wel+(ot intro+sa hello+sa ~) ~)
==
--
--