From a46173ce7418851ee33cb46ec89d3bd9366bae6b Mon Sep 17 00:00:00 2001
From: Anton Dyudin <ohAitch@gmail.com>
Date: Tue, 2 Jun 2015 13:09:21 -0700
Subject: [PATCH] pointed breload actually at /=base=

---
 base/cat/hood/breload/gate.hook |  2 +-
 base/lib/helm/core.hook         | 12 +++++-------
 2 files changed, 6 insertions(+), 8 deletions(-)

diff --git a/base/cat/hood/breload/gate.hook b/base/cat/hood/breload/gate.hook
index 7f3ad66863..cb712d7cbf 100644
--- a/base/cat/hood/breload/gate.hook
+++ b/base/cat/hood/breload/gate.hook
@@ -8,5 +8,5 @@
 |=  $:  [now=@da eny=@uvI bec=beak]
         [arg=(list term) ~]
     ==
-:+  %hood-reload-desk  %home
+:+  %hood-reload-desk  %base
 arg
diff --git a/base/lib/helm/core.hook b/base/lib/helm/core.hook
index 5fc3b0c43d..d93730723b 100644
--- a/base/lib/helm/core.hook
+++ b/base/lib/helm/core.hook
@@ -91,7 +91,8 @@
     %-  emil
     %-  flop
     %+  turn  all
-    =+  ark=(arch .^(%cy /(scot %p our)/[syd]/(scot %da now)/arvo))
+    =+  top=`path`/(scot %p our)/[syd]/(scot %da now)/arvo
+    =+  ark=(arch .^(%cy top))
     =+  van=(~(tap by r.ark))
     |=  nam=@tas
     =.  nam
@@ -102,12 +103,9 @@
       ?>  ?=([[@ ~] ~] zaz)
       `term`p.i.zaz
     =+  tip=(end 3 1 nam)
-    =+  way=[(scot %p our) %home (scot %da now) %arvo nam %hoon ~]
-    =+  fil=(,@ .^(%cx way))
-    :*  %flog
-        /reload
-        [%veer ?:(=('z' tip) %$ tip) way (,@ .^(%cx way))]
-    ==
+    =+  way=(welp top /[nam])
+    =+  fil=(,@ .^(%cx (welp way /hoon)))
+    [%flog /reload [%veer ?:(=('z' tip) %$ tip) way fil]]
   ::
   ++  poke-reset                                        ::  reset system
     |=  hood-reset  =<  abet