From 231a7028523ef1d5160f4578f800127a5aabfd80 Mon Sep 17 00:00:00 2001
From: "C. Guy Yarvin" <cgyarvin@gmail.com>
Date: Mon, 3 Mar 2014 13:55:40 -0800
Subject: [PATCH] Make :curl work again.

---
 arvo/zuse.hoon | 15 +++++++++++++++
 1 file changed, 15 insertions(+)

diff --git a/arvo/zuse.hoon b/arvo/zuse.hoon
index 9fc0c3438..fbce2843f 100644
--- a/arvo/zuse.hoon
+++ b/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