mirror of
https://github.com/urbit/shrub.git
synced 2024-12-15 21:03:10 +03:00
23 lines
464 B
Plaintext
23 lines
464 B
Plaintext
!:
|
|
|_ [hid=hide ~]
|
|
++ poke-reload-args
|
|
|= [ost=bone you=ship all=(list ,@tas)]
|
|
:_ +>.$
|
|
%+ welp
|
|
%+ turn all
|
|
|= nam=@tas
|
|
=+ tip=(end 3 1 nam)
|
|
=+ pax=[(scot %p our.hid) %arvo (scot %da lat.hid) nam %hoon ~]
|
|
[ost %give %veer ?:(=('z' tip) %$ tip) pax (,@ .^(%cx pax))]
|
|
:- [ost %give %nice ~]
|
|
%+ turn (~(tap by sup.hid))
|
|
|= [ost=bone *]
|
|
:^ ost %give %rush
|
|
:- %tang :_ ~
|
|
leaf/"done"
|
|
++ peer
|
|
|=
|
|
*
|
|
`+>
|
|
--
|