From c23db2bcd372748e1d80cc02a1dc977fab57656d Mon Sep 17 00:00:00 2001 From: Anton Dyudin Date: Fri, 20 Oct 2017 10:52:31 -0700 Subject: [PATCH] fix &womb-invite and &sole-action --- mar/sole/action.hoon | 11 +++++++++-- mar/womb/invite.hoon | 4 ++-- 2 files changed, 11 insertions(+), 4 deletions(-) diff --git a/mar/sole/action.hoon b/mar/sole/action.hoon index e117e80cc4..2b515e6a07 100644 --- a/mar/sole/action.hoon +++ b/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 ~) ~) -- :: diff --git a/mar/womb/invite.hoon b/mar/womb/invite.hoon index c7b05f48b6..f733909d5d 100644 --- a/mar/womb/invite.hoon +++ b/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