urbit/shrub
1
1
Fork 0
mirror of https://github.com/urbit/shrub.git synced 2024-12-25 13:04:17 +03:00
Code Issues Packages Projects Releases Wiki Activity

invites: import/export

Browse Source
This commit is contained in:
Isaac Visintainer 2020-11-30 13:07:26 -08:00
parent 4f0e599cb1
commit 398fb5de50
1 changed files with 9 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

9
pkg/arvo/app/invite-store.hoon
View File

@ -102,9 +102,16 @@
=^ cards state =^ cards state
?+ mark (on-poke:def mark vase) ?+ mark (on-poke:def mark vase)
%invite-action (poke-invite-action !<(action:store vase)) %invite-action (poke-invite-action !<(action:store vase))
%import (poke-import q.vase)
== ==
[cards this] [cards this]
:: ::
++ poke-import
|= arc=*
^- (quip card _state)
=/ sty=state-1 ;;(state-1 arc)
[~ sty]
::
++ poke-invite-action ++ poke-invite-action
|= =action:store |= =action:store
^- (quip card _state) ^- (quip card _state)
@ -205,5 +212,7 @@
:^ ~ ~ %noun :^ ~ ~ %noun
!> ^- (unit invite:store) !> ^- (unit invite:store)
(~(get by invitatory) serial) (~(get by invitatory) serial)
::
[%x %export ~] ``noun+!>(state)
== ==
-- --