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

Actually put out eyre fires

Browse Source
This commit is contained in:
Anton Dyudin 2015-01-30 18:18:22 -08:00
parent 4d17234fd6
commit def54e2321
1 changed files with 7 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

10
arvo/ames.hoon
View File

@ -1703,9 +1703,13 @@
:_ ~
=+ neh=(claw p.p.bon)
?> ?=(^ neh)
?: &(?=(%e ven) ?=(%pc cak)) :: XX fix eyre
:_ [%sick %wart p.bon cak `path`t.t.t.q.q.bon r.bon]
[[%e `path`t.t.t.q.q.bon] hen]
?: ?=(%e ven)
?+ cak !! :: XX fix eyre
%pr :_ [%sick %waft p.bon r.bon]
[[`path`t.t.t.q.q.bon] hen]
%pc :_ [%sick %wart p.bon cak `path`t.t.t.q.q.bon r.bon]
[[%e `path`t.t.t.q.q.bon] hen]
==
=+ ton=[%waft p.bon r.bon]
:: ~& [%milk-waft [[ven `path`t.t.t.q.q.bon] t.neh]]
:_ [%sick ton]