shrub/gen/hood/transfer.hoon
2016-04-29 14:40:44 -07:00

17 lines
395 B
Plaintext

::
:::: /hoon/transfer/hood/gen
::
/? 310
/+ womb
::
::::
!:
:- %say
|= $: {now/@da eny/@uvI bec/beak}
{{pas/@pG who/@ta $~} $~}
==
:- %womb-reinvite
=+ [him=(scot %p p.bec) cas=(scot %da now) key=(scot %p pas)]
=+ [pla=planets sta=stars]:.^(balance:womb %gx /[him]/hood/[cas]/womb/balance/[key])
[pas who pla sta "Email updated, new passcode" "Email correction"]