X-Git-Url: http://dxcluster.org/gitweb/gitweb.cgi?a=blobdiff_plain;f=perl%2FDXCron.pm;h=8fb0f4664489609be8a6f3f56c584d6b6956d1fd;hb=01ba3df164dca5b803527a4b7db6e5d36a334f91;hp=d2e434bcbbd5bc1d1a4555ec7dd101e0d3d729a3;hpb=465426f9282b990ec3462c63e5ca7613f92fb290;p=spider.git

diff --git a/perl/DXCron.pm b/perl/DXCron.pm
index d2e434bc..8fb0f466 100644
--- a/perl/DXCron.pm
+++ b/perl/DXCron.pm
@@ -13,7 +13,6 @@ use DXUtil;
 use DXM;
 use DXDebug;
 use IO::File;
-use Carp;
 
 use strict;
 
@@ -300,7 +299,7 @@ sub rcmd
 	return  if !$noderef || !$noderef->pcversion;
 
 	# send it 
-	DXProt::addrcmd($main::mycall, $call, $line);
+	DXProt::addrcmd($DXProt::me, $call, $line);
 }
 1;
 __END__