From f5d8c1997cfc17d92bfa9ef950b24d1cdab99ca5 Mon Sep 17 00:00:00 2001
From: Anton Dyudin <ohAitch@gmail.com>
Date: Thu, 25 May 2017 10:32:07 -0700
Subject: [PATCH] parse reference as @p, not @uv

---
 mar/womb/invite.hoon | 16 +++++++++-------
 1 file changed, 9 insertions(+), 7 deletions(-)

diff --git a/mar/womb/invite.hoon b/mar/womb/invite.hoon
index 6d14ddd6e..9f42fe6c4 100644
--- a/mar/womb/invite.hoon
+++ b/mar/womb/invite.hoon
@@ -12,16 +12,18 @@
   |%
   ++  noun  {cord reference invite}:womb                ::  clam from %noun
   ++  json
-    %+  corl  need
+    |=  jon/^json  ^-  {cord reference invite}:womb
+    %-  need
+    %.  jon 
     =>  jo
-    =+  ^=  mail
-        ;~  simu
-          ;~(pfix (plus ;~(less pat next)) pat)
-          (cook crip (star ;~(less ace prn)))
-        ==
+    =/  mail
+      ;~  simu
+        ;~(pfix (plus ;~(less pat next)) pat)
+        (cook crip (star ;~(less ace prn)))
+      ==
     %-  ot  :~
       tid+so
-      ref+(mu (su (pick ;~(pfix (jest '0v') viz:ag) mail)))
+      ref+(mu (su (pick ;~(pfix sig fed:ag) mail)))
       inv+(ot who+(su mail) pla+ni sta+ni wel+(ot intro+sa hello+sa ~) ~)
     ==
   --