fix &womb-invite and &sole-action

mar/sole/action.hoon

@@ -27,11 +27,18 @@
       |=  c/json  %.  c
       ?.(=(%a -.c) b (pe -.a (ar +.a)))
     ::
-    ++  change  (ot ler+(at ni ni ~) ted+(cu |*(a/* [0v0 a]) edit) ~)
+    ++  ke                                              ::  callbacks
+      |*  {gar/* sef/(trap fist)}
+      |=  jon/json  ^-  (unit _gar)
+      =-  ~!  gar  ~!  (need -)  -
+      ((sef) jon)
+    ::
+    ++  change  (ot ler+(at ni ni ~) ted+(pe 0v0 edit) ~)
     ++  char  (cu turf so)
     ++  edit
+      %+  ke  *sole-edit  |.  ~+
       %+  fo  %nop
-      %+  ra  mor+|=(json (edit +<))
+      %+  ra  mor+edit
       (of del+ni set+(cu tuba sa) ins+(ot at+ni cha+char ~) ~)
     --
   ::

mar/womb/invite.hoon

@@ -7,11 +7,11 @@
 ::::  ~fyr
   ::
 =,  old-zuse
-|_  {cord invite}:womb
+|_  {cord invite:womb}
 ::
 ++  grab                                                ::  convert from
   |%
-  ++  noun  {cord invite}:womb                ::  clam from %noun
+  ++  noun  {cord invite:womb}                ::  clam from %noun
   ++  json
     %+  corl  need
     =>  jo