mirror of
https://github.com/urbit/shrub.git
synced 2024-12-21 09:51:36 +03:00
e036c96b61
Produces a (unit (cask)), as per %tune.
13 lines
309 B
Plaintext
13 lines
309 B
Plaintext
/- spider
|
|
/+ strandio
|
|
=, strand=strand:spider
|
|
^- thread:spider
|
|
|= arg=vase
|
|
=/ m (strand ,vase)
|
|
^- form:m
|
|
=+ !<([~ arg=path] arg)
|
|
;< ~ bind:m (send-raw-card:strandio %pass / %arvo %a %keen arg)
|
|
;< [wire sign=sign-arvo] bind:m take-sign-arvo:strandio
|
|
?> ?=(%tune +<.sign)
|
|
(pure:m !>(data.sign))
|