diff --git a/arvo/hoon.hoon b/arvo/hoon.hoon index fd463bb12..4d6e6999c 100644 --- a/arvo/hoon.hoon +++ b/arvo/hoon.hoon @@ -9601,6 +9601,7 @@ :::::: :::::::::::::::::::::::::::::::::::::::::::::::::::::: :::::: :::::: volume 3, Arvo models and skeleton :::::: :::::: :::::::::::::::::::::::::::::::::::::::::::::::::::::: +!: ~% %arvo + ~ |% ++ arch ,[p=@uvI q=(unit ,@uvI) r=(map ,@ta ,~)] :: fundamental node @@ -9708,7 +9709,7 @@ :::::::::::::::::::::::::::::::::::::::::::::::::::::::::: :: section 3bE, Arvo core :: :: -++ vent !: :: vane core +++ vent :: vane core |= [lal=@tas vil=vile bud=vase ves=vase] ~% %vent +>+ ~ |% diff --git a/main/app/rodeo/core.hook b/main/app/rodeo/core.hook index 87c1b19e2..8fd542bb3 100644 --- a/main/app/rodeo/core.hook +++ b/main/app/rodeo/core.hook @@ -161,6 +161,8 @@ |= [her=ship pax=path] ^+ +> ~& [%ra-subscribe pax] + ?: ?=(~ pax) + ra-house(general (~(put in general) ost)) ?: ?=([%am @ ~] pax) =+ pur=(~(get by parties) i.t.pax) ?~ pur @@ -176,8 +178,6 @@ ?. ?=([%fm *] pax) ~& [%bad-subscribe pax] (ra-evil %radio-bad-path) - ?: =(~ t.pax) - ra-house(general (~(put in general) ost)) ?. &(?=([@ *] t.pax) ((sane %tas) i.t.pax)) ~& [%bad-subscribe pax] (ra-evil %radio-bad-path) @@ -489,10 +489,7 @@ |= old=(unit (unit house)) ^- [(list move) _+>] ~& %rodeo-prep - ?> ?=(^ old) - ?^ u.old - [~ +>(+<+ u.u.old)] - ra-abet:(~(ra-apply ra 0 ~) our.hid %design %main `[~ [%| ~]]) + [~ +>] :: ++ pull |= ost=bone