urbit/mar/womb/invite.hoon

34 lines
749 B
Plaintext
Raw Normal View History

2016-05-07 01:34:18 +03:00
::
:::: /hoon/stat-all/womb/mar
::
/? 310
2017-11-30 00:28:33 +03:00
/+ hood-womb, old-zuse
2016-05-07 01:34:18 +03:00
::
:::: ~fyr
::
2017-11-30 00:28:33 +03:00
=* invite invite:hood-womb
=* reference reference:hood-womb
2017-02-14 03:02:25 +03:00
=, old-zuse
|_ {cord reference invite}
2016-05-07 01:34:18 +03:00
::
++ grab :: convert from
|%
++ noun {cord reference invite} :: clam from %noun
2016-05-07 01:34:18 +03:00
++ json
|= jon/^json ^- {cord reference invite}
2017-05-25 20:32:07 +03:00
%- need
%. jon
2016-05-07 01:34:18 +03:00
=> jo
2017-05-25 20:32:07 +03:00
=/ mail
;~ simu
;~(pfix (plus ;~(less pat next)) pat)
(cook crip (star ;~(less ace prn)))
==
2016-05-07 01:34:18 +03:00
%- ot :~
tid+so
2017-05-25 20:32:07 +03:00
ref+(mu (su (pick ;~(pfix sig fed:ag) mail)))
2016-05-07 01:34:18 +03:00
inv+(ot who+(su mail) pla+ni sta+ni wel+(ot intro+sa hello+sa ~) ~)
==
--
--