X-Git-Url: http://gb7djk.dxcluster.net/gitweb/gitweb.cgi?a=blobdiff_plain;f=perl%2FDXProt.pm;h=3001d6eb1b3cb8a9c4f7fe894ff3cf2ec5ae8115;hb=a9072bdb10a67ad28edda787cbf38018356b2db5;hp=7972bc3bf83f6ba7baa677ed29ebac82e7fd0fb1;hpb=5def24d66561e13e76b7af3109810be21deeeffb;p=spider.git

diff --git a/perl/DXProt.pm b/perl/DXProt.pm
index 7972bc3b..3001d6eb 100644
--- a/perl/DXProt.pm
+++ b/perl/DXProt.pm
@@ -1547,9 +1547,8 @@ sub handle_51
 	}
 
 	my $thing = Thingy::Ping->new(origin=>$main::mycall);
-	$thing->from_DXProt(user=>$_[2], group=>$_[1], out=>$_[3], DXProt=>$line);
-	$thing->process($self);
-	
+	$thing->from_DXProt($self, $line, @_);
+	$thing->handle($self);
 }
 
 # dunno but route it