From 7f15868bb42d0fd790dd41a886fc14127f4cf41c Mon Sep 17 00:00:00 2001 From: minima Date: Tue, 22 Feb 2005 16:15:45 +0000 Subject: [PATCH] fix np ambiguity --- perl/Thingy/Hello.pm | 3 +-- 1 file changed, 1 insertion(+), 2 deletions(-) diff --git a/perl/Thingy/Hello.pm b/perl/Thingy/Hello.pm index cd31842f..9c6a539f 100644 --- a/perl/Thingy/Hello.pm +++ b/perl/Thingy/Hello.pm @@ -118,14 +118,13 @@ sub handle if ($uref->is_node || $uref->is_aranea) { push @ref, $nref->add($user, $thing->{v}, $thing->{h}); push @{$thing->{pc19n}}, @ref if @ref; + do $_->np(1) for @ref; } else { $thing->{pc16n} = $nref; push @ref, $nref->add_user($user, $thing->{h}); $thing->{pc16u} = \@ref if @ref; } - $ur = Route::get($user); } - $ur->np(1); } else { $nref->version($thing->{v}) unless $nref->version; $nref->build($thing->{b}) unless $nref->build; -- 2.34.1