X-Git-Url: http://dxcluster.net/gitweb/gitweb.cgi?a=blobdiff_plain;f=perl%2FDXCron.pm;h=343ba88d7d33218863798c7874c8a2d37e75340b;hb=fa7bdf4c84e162d43cb6ba5b43f89cc230ebcc30;hp=2c02be53e4432c22def3c6ad28bfa83076a93a9f;hpb=fd0a34c34ad4112ee21e0730f7307498ff437e18;p=spider.git diff --git a/perl/DXCron.pm b/perl/DXCron.pm index 2c02be53..343ba88d 100644 --- a/perl/DXCron.pm +++ b/perl/DXCron.pm @@ -219,7 +219,7 @@ sub last_connect { my $call = uc shift; return $main::systime if DXChannel::get($call); - my $user = DXUser->get($call); + my $user = DXUser::get($call); return $user ? $user->lastin : 0; } @@ -293,5 +293,9 @@ sub run_cmd dbg("cmd out: $_") if isdbg('cron'); } } + +# for fallback from mojo branch +sub spawn_cmd {goto &run_cmd}; + 1; __END__