diff --git a/tests/sys/vane/ames.hoon b/tests/sys/vane/ames.hoon index a921b3ab35..a7f11c74e3 100644 --- a/tests/sys/vane/ames.hoon +++ b/tests/sys/vane/ames.hoon @@ -539,7 +539,7 @@ ++ test-fine-request ^- tang =/ want=path /c/z/1/kids/sys - =^ moves1 nec (call nec ~[/g/talk] %keen ~bud want) + =^ moves1 nec (call nec ~[/g/talk] %keen ~ ~bud want) =/ req=hoot:ames %+ snag 0 %+ murn ;;((list move:ames) moves1) @@ -697,4 +697,24 @@ !> [~[/g/talk] %give %boon [%post '¡hola!']] !> (snag 0 `(list move:ames)`moves7) == +:: +++ test-plug ^- tang + =^ moves nec + (call nec ~[/g/talk] %plug %g /foo) + =/ expected-key + 3.782.450.905.364.316.746.465.724.430.826.633.339.627.682.402.565.789.971.442.035.627.125.517.743.962.901.817.756.764.395.497.041.697.150.935.487.420.935.470.530.023.121.462.879.251.503.082.973.208.842.762 + %- zing + :- + %+ expect-eq !>(moves) + !> ^- (list move:ames) + :~ [~[/g/talk] %give %stub 1 expected-key] + == + =^ moves2 bud + (call bud ~[/g/talk] %keen `[1 expected-key] ~nec /foo/bar) + :_ ~ + %+ expect-eq !>(moves2) + !> ^- (list move:ames) + :~ [~[/g/talk] [%pass /fine/shut/1 [%a [%keen sec=~ ship=~nec path=/a/x/1//fine/shut/0v7.vdpsi.f9s0b.1b9k6.u3aho.mtquj]]]] + == +:: --