Merge pull request #5413 from urbit/jb/start

arvo: fix |start

pkg/arvo/app/test.hoon

@@ -50,7 +50,7 @@
       |=(c=@tD `@tD`?:(=('/' c) '-' c))
     =/  sing=card
       :+  %pass  /build/mar/[mak]
-      [%arvo %c %warp our.bowl %home ~ %sing %b da+now.bowl /[mak]]
+      [%arvo %c %warp our.bowl q.byk.bowl ~ %sing %b da+now.bowl /[mak]]
     %_  $
       paz        t.paz
       fex        [sing fex]
@@ -72,7 +72,7 @@
       $(daz t.daz)
     =/  sing=card
       :+  %pass  /build/app/[i.daz]
-      [%arvo %c %warp our.bowl %home ~ %sing %a da+now.bowl dap-pax]
+      [%arvo %c %warp our.bowl q.byk.bowl ~ %sing %a da+now.bowl dap-pax]
     %_  $
       daz        t.daz
       fex        [sing fex]
@@ -92,7 +92,7 @@
       $(paz t.paz)
     =/  sing=card
       :+  %pass  build+i.paz
-      [%arvo %c %warp our.bowl %home ~ %sing %a da+now.bowl i.paz]
+      [%arvo %c %warp our.bowl q.byk.bowl ~ %sing %a da+now.bowl i.paz]
     %_  $
       paz        t.paz
       fex        [sing fex]

pkg/arvo/gen/hood/start.hoon

@@ -10,8 +10,9 @@
 |=  $:  [now=@da eny=@uvJ bec=beak]
         [arg=[@ $@(~ [@ ~])] ~]
     ==
-:-  %drum-start
-?>  ((sane %tas) -.arg)
-?@  +.arg  [q.bec -.arg]
-?>  ((sane %tas) +<.arg)
-[-.arg +<.arg]
+=/  [des=@tas dap=@tas]
+  ?>  ((sane %tas) -.arg)
+  ?@  +.arg  [q.bec -.arg]
+  ?>  ((sane %tas) +<.arg)
+  [-.arg +<.arg]
+[%kiln-rein des & [dap ~ ~] ~]

pkg/arvo/gen/show-vat.hoon

@@ -1,4 +1,3 @@
-/-  *bill
 :-  %say
 |=  $:  [now=@da eny=@uvJ bec=beak]
         [=desk ~]
@@ -11,5 +10,5 @@
 :~  'sys.kelvin:'
     leaf/"[%{<lal>} %{<num>}]"
     'desk.bill:'
-    (sell !>(.^(bill cx+(weld pax /desk/bill))))
+    (sell !>(.^((list dude:gall) cx+(weld pax /desk/bill))))
 ==