diff --git a/arvo/gall.hoon b/arvo/gall.hoon index 48244c44d6..d96c09ef8a 100644 --- a/arvo/gall.hoon +++ b/arvo/gall.hoon @@ -353,7 +353,7 @@ ^- [(list move) _..^^$] ?> ?=(?(%mess %show %nuke %took) -.kon) ?: ?=(%took -.kon) - ~& [%gape-took our imp hen] + :: ~& [%gape-took our imp hen] [~ ..^^$] =+ you=`ship`?-(-.kon %mess p.kon, %nuke p.kon, %show p.kon) =+ mat=(~(got by pol.all) you) @@ -1153,9 +1153,9 @@ =+ qol=(~(get by qel.sat) ost) :: ~& [%yawn-told-has qol [our hen]] =+ qul=?~(qol 1 +(u.qol)) - :: ?: =(10 qul) - :: ~& [%yawn-told-full our hen] - :: +>.$(qic.sat `[hen %nuke p.kon]) + ?: =(10 qul) + ~& [%yawn-told-full our hen] + +>.$(qic.sat `[hen %nuke p.kon]) +>.$(qic.sat ~, qel.sat (~(put by qel.sat) ost qul)) :: %load diff --git a/main/app/rodeo/core.hook b/main/app/rodeo/core.hook index a0ab2b3206..55d99bf852 100644 --- a/main/app/rodeo/core.hook +++ b/main/app/rodeo/core.hook @@ -491,7 +491,7 @@ %| ~& tweet-acquire/p.p.tay !! :: - %& ~& [%pa-acquire [our.hid man] [p.p.tay q.p.tay]] + %& :: ~& [%pa-acquire [our.hid man] [p.p.tay q.p.tay]] :~ :- /friend/show/(scot %p p.p.tay)/[man] [%g %show [p.p.tay /rodeo] our.hid /af/[q.p.tay]/(scot %ud num)] == diff --git a/main/app/talk/core.hook b/main/app/talk/core.hook index 4021c282cd..8b8cac82fa 100644 --- a/main/app/talk/core.hook +++ b/main/app/talk/core.hook @@ -288,7 +288,7 @@ :~ %afx man ?: =(0 count) - ~& [%story-init man `@da`(sub lat.hid ~d1)] + :: ~& [%story-init man `@da`(sub lat.hid ~d1)] (scot %da (sub lat.hid ~d1)) (scot %ud count) == @@ -403,7 +403,7 @@ ++ sy-grams :: apply telegrams |= [num=@ud gaz=(list telegram)] ^+ +> - ~& [%sy-grams [num count] (lent gaz)] + :: ~& [%sy-grams [num count] (lent gaz)] ?: (gth num count) (sy-message(count 0) "message gap: {} at {}") =. . @@ -607,7 +607,9 @@ %mean ~&([%pour-mean-cmd-in +>.sih] !!) %rush ?> ?=(%txt -.p.sih) - (pour-shell p.p.sih) + =^ moz +>.$ (pour-shell p.p.sih) + :_ +>.$ + :_(moz [ost %pass pax %g %took [our.hid +.imp.hid] our.hid]) == :: %cmd-ac