diff --git a/sys/arvo.hoon b/sys/arvo.hoon index 897bc0890..1bff1ab22 100644 --- a/sys/arvo.hoon +++ b/sys/arvo.hoon @@ -158,7 +158,7 @@ ++ slur :: call gate on |= {gat/vase hil/mill} ^- (unit (pair vase worm)) - =+ sam=(slot 6 gat) + =^ sam p.sew (~(slot wa p.sew) 6 gat) =+ ^= hig ?- -.hil %& (~(nest wa p.sew) p.sam p.p.hil)