From c85cacb2bc438725ee83553226e944f9f605d3b7 Mon Sep 17 00:00:00 2001 From: minima Date: Fri, 11 Mar 2005 22:02:43 +0000 Subject: [PATCH] make sure touser is passed on --- perl/Aranea.pm | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/perl/Aranea.pm b/perl/Aranea.pm index 079e215a..7765af34 100644 --- a/perl/Aranea.pm +++ b/perl/Aranea.pm @@ -405,7 +405,7 @@ sub input $thing = $class->new(); # reconstitute the header but wth hop increased by one - $head = formathead($origin, $dts, ++$hop, $user, $group); + $head = formathead($origin, $dts, ++$hop, $user, $group, $tocall); $thing->{Aranea} = "$head|$data"; # store useful data -- 2.43.0