Various fixes and improvements.

arvo/hoon.hoon

@@ -5460,7 +5460,7 @@
     {$pin p/twig q/twig}                                ::  =+  q w/[p subject]
     {$tow p/(list twig)}                                ::  =~  twig stack
     {$aka p/term q/twig r/twig}                         ::  =*  r w/alias p/q
-    {$use p/wing q/twig}                                ::  =,  overlap  
+    {$use p/twig q/twig}                                ::  =,  overload p in q
   ::                                            ::::::  conditionals
     {$or p/(list twig)}                                 ::  ?|  loobean or
     {$case p/wing q/(list (pair twig twig))}            ::  ?-  pick case in q
@@ -6424,6 +6424,7 @@
       %vet    vet
       %fab    fab
       %burn   burn
+      %busk   busk
       %buss   buss
       %crop   crop
       %duck   duck
@@ -6486,6 +6487,14 @@
         $void       ~
     ==
   ::
+  ++  busk
+    ~/  %busk
+    |=  gen/twig
+    ^-  span
+    ?:  ?=({$face ^ *} sut)
+      [%face [p.p.sut [gen q.p.sut]] q.sut]
+    [%face [~ [gen ~]] sut]
+  ::
   ++  buss
     ~/  %buss
     |=  {cog/term gen/twig}
@@ -7243,6 +7252,9 @@
     ::
         {$aka *}
       $(gen r.gen, sut (buss p.gen q.gen))
+    ::
+        {$use *}
+      $(gen q.gen, sut (busk p.gen))
     ::
         {$if *}
       =+  nor=$(gen p.gen, gol bool)
@@ -9049,6 +9061,7 @@
                   (word %aka expl)
                   (word %pin expb)
                   (word %tow expi)
+                  (word %use expb)
                 ::
                   (word %or exps)
                   (word %if expc)
@@ -9139,6 +9152,7 @@
                     ['>' (rune gar %per expb)]
                     ['-' (rune hep %nip expb)]
                     ['*' (rune tar %aka expl)]
+                    [',' (rune com %use expb)]
                     ['+' (rune lus %pin expb)]
                     ['~' (rune sig %tow expi)]
                 ==

arvo/jael.hoon

@@ -22,6 +22,14 @@
   ::                                                    ::::
 |=  pit/vase
 =>  |%
+++  funky
+  ^?
+  |%
+  ++  monkey
+    (mul 6 70)
+  --
+--
+=>  |%
 ::                                                      ::
 ::::                        ## 0.a                      ::  certificates
   ::                                                    ::::
@@ -228,7 +236,9 @@
       ::  derived.  it consists of all the state we need to
       ::  manage subscriptions efficiently.
     ::::
+=,  funky
 =>  |%
+++  ape  monkey:funky
 ++  state                                               ::  all vane state
   $:  ver/$0                                            ::  vane version 
       yen/(set duct)                                    ::  raw observers

arvo/zuse.hoon

@@ -3104,7 +3104,7 @@
   $%  {$send p/hiss}                                    ::  http out
       {$show p/purl}                                    ::  direct user to url
       {$give p/httr}                                    ::  respond immediately
-      {$redo $~}                                         ::  restart request qeu
+      {$redo $~}                                        ::  restart request qeu
   ==                                                    ::
 ++  ball  @uw                                           ::  statement payload
 ++  bait  {p/skin q/@ud r/dove}                         ::  fmt nrecvd spec