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

:begin fix

Browse Source
This commit is contained in:
Philip C Monk 2014-11-20 17:49:23 -05:00
parent fd254ee4f8
commit d585e74ef9
1 changed files with 7 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
main/app/begin/core.hook
View File

@ -547,8 +547,12 @@
?~(pot.res ~ (spam %rush %prompt u.pot.res))
%- zing
(turn (flop tak.res) |=(a=cord (spam %rush %txt a)))
[[ost %give +.sih] +>.$]
[[ost %give +.sih]~ +>.$]
:: ?. ?=(?(%nice %mean) +<.sih)
:: [[ost %give +.sih]~ +>.$]
:: ?+ +<.sih
:: [[ost %give +.sih]~ +>.$]
:: %nice
:: :_ +>.$
:: :- [ost %give +.sih]
:: %+ turn (~(tap by sup.hid))
@ -556,6 +560,8 @@
:: :^ ost %give %rush
:: :- %tang :_ ~
:: [%leaf ?:(?=(%nice +<.sih) "begin successful" "begin failed")]
:: %mean
:: ==
::
++ peer
|=