diff --git a/main/app/helm/core.hook b/main/app/helm/core.hook index 259383dfd5..0c3fec95d1 100644 --- a/main/app/helm/core.hook +++ b/main/app/helm/core.hook @@ -460,7 +460,7 @@ ?~ wil [ost %give %mean ~ %rejected ~]~ :~ [ost %pass / %a %cash p.u.bur q.u.bur u.wil] - [ost %pass / %c %plug our.hid %main (sein our.hid) %main] + [ost %pass / %c %plug our.hid %main (sein our.hid) %main-away] [ost %give %nice ~] == :: diff --git a/main/arvo/clay.hoon b/main/arvo/clay.hoon index 883099e319..26ced82532 100644 --- a/main/arvo/clay.hoon +++ b/main/arvo/clay.hoon @@ -1541,12 +1541,12 @@ ^+ +> ?: (~(has by mer) ali) (error:he %already-merging ~) - ?: &(=(0 let.dom) !?=(%init gem)) + ?: &(=(0 let.dom) !?=(?(%init %auto) gem)) (error:he %no-bob-desk ~) =. gem.dat gem =. cas.dat [%da now] - ?: ?=(%init gem.dat) - fetch-ali + ?: =(0 let.dom) + fetch-ali(gem.dat %init) =+ (~(get by hit.dom) let.dom) ?~ - (error:he %no-bob--version ~) @@ -2364,7 +2364,7 @@ ^- (list move) %+ turn (limo ~[%main]) |= syd=@tas - [hen %pass / %c %font p.q.hic syd bos syd] + [hen %pass / %c %font p.q.hic syd bos (cat 3 syd '-away')] :: %info ?: =(%$ q.q.hic)