shrub/gen/hood/invite.hoon
2017-11-29 13:38:16 -08:00

20 lines
492 B
Plaintext

:: Womb: allocate urbits to the holder of an email
::
:::: /hoon/invite/hood/gen
::
/? 310
::
::::
::
/+ hood-womb
=* invite invite:hood-womb
=* reference reference:hood-womb
:- %say
|= $: {now/@da eny/@uvJ bec/beak}
{{who/@t $~} ref/(unit (each ship mail:hood-womb)) sta/@}
==
:- %womb-invite
^- {cord reference invite}
=+ inv=(scot %uv (end 7 1 eny))
[inv ref [who 10 sta "You have been invited to Urbit: {(trip inv)}" "This is an invite of 10 planets"]]