invite-store: move to de-path-soft

This commit is contained in:
Logan Allen 2020-10-27 19:18:56 -05:00
parent 870a6f635f
commit ef67bdea8b

View File

@ -59,14 +59,17 @@
:- ~
:- i.path
%- ~(gas by *invitatory:store)
%+ turn ~(tap by invitatory-0)
%+ murn ~(tap by invitatory-0)
|= [=serial:store =invite-0]
^- [serial:store invite:store]
^- (unit [serial:store invite:store])
=/ resource=(unit resource:res) (de-path-soft:res path.invite-0)
?~ resource ~
:- ~
:- serial
^- invite:store
:* ship.invite-0
app.invite-0
(de-path:res path.invite-0)
u.resource
recipient.invite-0
text.invite-0
==