X-Git-Url: http://dxcluster.org/gitweb/gitweb.cgi?a=blobdiff_plain;f=perl%2FDXCron.pm;h=74b65996a3e54eb4d0b2cc01ab8488a9504a7ba2;hb=bf2433ea0cf3e501ded7dd83b06a026121860d3d;hp=785a1ad93774260a048098ce002d8c687c77219d;hpb=2b58ccdf81685a1167a43c38705a0d84b9d8d661;p=spider.git diff --git a/perl/DXCron.pm b/perl/DXCron.pm index 785a1ad9..74b65996 100644 --- a/perl/DXCron.pm +++ b/perl/DXCron.pm @@ -286,13 +286,13 @@ sub rcmd return unless $noderef && $noderef->version; # send it - DXProt::addrcmd($DXProt::me, $call, $line); + DXProt::addrcmd($main::me, $call, $line); } sub run_cmd { my $line = shift; - my @in = DXCommandmode::run_cmd($DXProt::me, $line); + my @in = DXCommandmode::run_cmd($main::me, $line); dbg("cmd run: $line") if isdbg('cron'); for (@in) { s/\s*$//og;