urbit/gen/hood/invite.hoon
2016-10-21 16:44:39 -07:00

18 lines
420 B
Plaintext

:: Womb: allocate urbits to the holder of an email
::
:::: /hoon/invite/hood/gen
::
/? 310
::
::::
::
/+ womb
:- %say
|= $: {now/@da eny/@uvJ bec/beak}
{{who/@t $~} ref/(unit (each ship mail:womb)) sta/@}
==
:- %womb-invite
^- {cord reference invite}:womb
=+ 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"]]