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

diff --git a/perl/DXProt.pm b/perl/DXProt.pm
index ac755b09..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($_[2] eq $self->{call} ? (user=>$_[2]) : (user=>$self->{call}, o=>$_[2]), group=>$_[1], out=>$_[3], DXProt=>$line);
-	$thing->process($self);
-	
+	$thing->from_DXProt($self, $line, @_);
+	$thing->handle($self);
 }
 
 # dunno but route it