less mechanical cleanup

gen/hood/bonus.hoon

@@ -3,6 +3,8 @@
 ::::  /hoon/bonus/hood/gen
   ::
 /?    310
+/+  old-zuse
+=,  old-zuse
 ::
 ::::
   ::
@@ -13,4 +15,4 @@
 ?~  opt  $(opt [planets=1]~)
 ?~  +.opt  $(+.opt [stars=0]~)
 :-  %womb-bonus
-[(scot %uv pas) planets stars]
+[(scot %uv pas) planets.opt stars.opt]

gen/hood/load.hoon

@@ -3,7 +3,8 @@
 ::::  /hoon/load/hood/gen
   ::
 /?    310
-/+    womb
+/+    womb,  old-zuse
+=,  old-zuse
 ::
 ::::
   ::

gen/metal.hoon

@@ -2,6 +2,8 @@
 ::::  /hoon/metal/gen
   ::
 /?    310
+/+  old-zuse
+=,  old-zuse
 ::
 ::::
   !:
@@ -277,7 +279,7 @@
             =/  dat  .^(@t %cx pax)
             [(met 3 dat) dat]
           ==
-      =/  all  (~(tap by dir.lon) ~)
+      =/  all  ~(tap by dir.lon)
       |-  ^-  mode:clay
       ?~  all  hav
       $(all t.all, hav ^$(tyl [p.i.all tyl]))