From fdcc80b1e297695b2597c5c75c5cef4d058a2885 Mon Sep 17 00:00:00 2001
From: Ted Blackman <ted@tlon.io>
Date: Fri, 17 Apr 2020 02:14:41 -0400
Subject: [PATCH] ford-fusion: use .baked.nub; fixes /mar/hoon dep cycle

---
 pkg/arvo/sys/vane/clay.hoon | 10 +++++++---
 1 file changed, 7 insertions(+), 3 deletions(-)

diff --git a/pkg/arvo/sys/vane/clay.hoon b/pkg/arvo/sys/vane/clay.hoon
index c452377c5..58f911b4e 100644
--- a/pkg/arvo/sys/vane/clay.hoon
+++ b/pkg/arvo/sys/vane/clay.hoon
@@ -2710,7 +2710,7 @@
               [%vale =path]
           ==
         +$  state
-          $:  baked=(map path cage)
+          $:  baked=(map path (unit cage))
               cache=ford-cache
               stack=(list (set path))
               cycle=(set build)
@@ -2742,8 +2742,12 @@
       |=  =path
       ^-  [(unit cage) state]
       ~|  %error-validating-path^path
-      ?^  cage=(~(get by baked.nub) path)
-        [cage nub]
+      ?^  got=(~(get by baked.nub) path)
+        [u.got nub]
+      =;  [res=(unit cage) bun=state]
+        =.  nub  bun
+        =.  baked.nub  (~(put by baked.nub) path res)
+        [res nub]
       ?:  (~(has in cycle.nub) vale+path)
         ~|(cycle+vale+path^stack.nub !!)
       =.  cycle.nub  (~(put in cycle.nub) vale+path)