From 1a4462123804e168d11e278f44af03cd2e0b8d7d Mon Sep 17 00:00:00 2001
From: Joe Bryan <joemfb@gmail.com>
Date: Wed, 5 Dec 2018 16:02:15 -0500
Subject: [PATCH] 6. trivially single-home arvo with %whom

---
 sys/arvo.hoon | 8 +++++++-
 1 file changed, 7 insertions(+), 1 deletion(-)

diff --git a/sys/arvo.hoon b/sys/arvo.hoon
index 72732d7e44..a3516bc72a 100644
--- a/sys/arvo.hoon
+++ b/sys/arvo.hoon
@@ -507,6 +507,7 @@
 =|  bod=(unit vase)                                     ::  %zuse if installed
 =|  $:  lac=?                                           ::  laconic bit
         eny=@                                           ::  entropy
+        urb/(unit ship)                                 ::  identity
         vanes=(list [label=@tas =vane])                 ::  modules
     ==                                                  ::
 =<  |%
@@ -598,7 +599,7 @@
   ::
   ::  XX should vega be in this list?
   ::
-  ?:  ?=(?(%veer %vega %verb %wack) -.q.ovo)
+  ?:  ?=(?(%veer %vega %verb %wack %whom) -.q.ovo)
     [[ovo ~] +>.$]
   ::
   =^  zef  vanes
@@ -640,6 +641,11 @@
     ?>  ?=(@ q.q.ovo)
     =.  eny  (mix eny (shaz q.q.ovo))
     [~ +>.$]
+  ::  become who you were born to be
+  ::
+      %whom
+    ?>  ?=(@ q.q.ovo)
+    [~ +>.$(urb `q.q.ovo)]
   ==
 ::                                                
 ++  veke                                                ::  build new kernel