mirror of
https://github.com/urbit/shrub.git
synced 2024-12-15 04:22:48 +03:00
16 lines
359 B
Plaintext
16 lines
359 B
Plaintext
:: Inspect all invites
|
|
::
|
|
:::: /hoon/balance/womb/gen
|
|
::
|
|
/? 310
|
|
/+ womb
|
|
:- %say
|
|
|= $: {now/@da eny/@uvJ bec/beak}
|
|
$~
|
|
who/(unit @p)
|
|
==
|
|
:- %womb-balance-all
|
|
=+ [him=(scot %p ?^(who u.who p.bec)) cas=(scot %da now)]
|
|
=/ balances =>(womb ,(set [passhash mail]))
|
|
.^(balances %gx /[him]/hood/[cas]/womb/balance/womb-balance-all)
|