From c4a169b536b6189937c6e789010c370ff3f2259e Mon Sep 17 00:00:00 2001 From: minima Date: Tue, 22 Feb 2005 15:52:03 +0000 Subject: [PATCH] move unknown user around --- perl/Thingy/Hello.pm | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/perl/Thingy/Hello.pm b/perl/Thingy/Hello.pm index 52230aa1..3eb72d61 100644 --- a/perl/Thingy/Hello.pm +++ b/perl/Thingy/Hello.pm @@ -119,7 +119,8 @@ sub handle push @{$thing->{pc19n}}, $ur if $ur; } else { $thing->{pc16n} = $nref; - $thing->{pc16u} = [$ur = $nref->add_user($user, $thing->{h})]; + $ur = $nref->add_user($user, $thing->{h}); + $thing->{pc16u} = [$ur]; } } $ur->np(1); -- 2.34.1