fixed one ot two little buglets

[spider.git] / perl / DXCron.pm

diff --git a/perl/DXCron.pm b/perl/DXCron.pm
index c31f4a92edf3dd33e5f5fc4ca96b3ce6ac9f14f8..961fa3a60df61c6aab1a096c16ef8412ba8e2806 100644 (file)
--- a/perl/DXCron.pm
+++ b/perl/DXCron.pm
@@ -25,7 +25,7 @@ $lasttime = 0;
 
 
 my $fn = "$main::cmd/crontab";
-my $localfn = "$main::local_cmd/crontab";
+my $localfn = "$main::localcmd/crontab";
 
 # cron initialisation / reading in cronjobs
 sub init
@@ -61,7 +61,7 @@ sub cread
                next if /^\s*#/o or /^\s*$/o;
                my ($min, $hour, $mday, $month, $wday, $cmd) = /^\s*(\w+)\s+(\w+)\s+(\w+)\s+(\w+)\s+(\w+)\s+(.+)$/o;
                next if !$min;
-               my $ref = new();
+               my $ref = bless {};
                my $err;
                
                $err |= parse($ref, 'min', $min, 0, 60);