Some HTTP client fixes.

arvo/hoon.hoon

@@ -341,7 +341,7 @@
           ==                                            ::
 ++  unce  |*  a=_,*                                     ::  change part
           $%([%& p=@ud] [%| p=(list a) q=(list a)])     ::
-++  unit  |*  a=_,*                                     ::  maybe
+++  unit  |*  a=$+(* *)                                 ::  maybe
           $|(~ [~ u=a])                                 ::
 ++  upas                                                ::  tree change (%d)
           $&  [p=upas q=upas]                           ::  cell
@@ -3162,6 +3162,16 @@
   ?.  &(?=(^ gat) ?=(^ +.gat))
     [%2 ~]
   (mink [[-.gat [sam +>.gat]] -.gat] sky)
+::
+++  myng
+  |=  [gat=* sam=*]
+  ^-  (each ,* (list tank))
+  =+  ton=(mong [gat sam] |=(* ~))
+  ?-  -.ton
+    %0  [%& p.ton]
+    %1  [%| (turn p.ton |=(a=* (smyt (path a))))]
+    %2  [%| p.ton]
+  ==
 ::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
 ::                section 2eO, diff (move me)           ::
 ::
@@ -4079,6 +4089,7 @@
 ++  onan  |=(vix=vise (seer vix))
 ++  rain
   |=  [bon=path txt=@]
+  ^-  twig
   =+  vaz=vast
   ~|  bon
   (scan (trip txt) (full (ifix [gay gay] tall:vaz(wer bon))))

arvo/zuse.hoon

@@ -1178,6 +1178,21 @@
     ==
   --
 ::
+++  feel                                                ::  simple file write
+  |=  [pax=path val=*]  !:
+  ^-  miso
+  =+  dir=((hard arch) .^(%cy pax))
+  ?~  q.dir  [%ins val]
+  :-  %mut
+  ^-  udon
+  [%a %a .^(%cx pax) val]
+::
+++  file                                                ::  simple file load
+  |=  pax=path
+  ^-  (unit)
+  =+  dir=((hard arch) .^(%cy pax))
+  ?~(q.dir ~ [~ .^(%cx pax)])
+::
 ++  glam
   |=  zar=@p  ^-  tape
   %+  snag  zar

try/bin/curl.hoon

@@ -47,6 +47,12 @@
         dez.folder
       :+  %&
         ~
-      [*cart [[:(weld sup.folder pax `path`/http) [%ins q.u.r.p.not]] ~]]
+      :-  *cart
+      =+  tol=:(weld sup.folder pax `path`/http) 
+      :~  :-  tol
+          %+  feel
+            (weld `path`[mih.folder dez.folder caz.folder ~] tol)
+          q.u.r.p.not
+      ==
   ==    
 --