add an RBN line to progress

[spider.git] / perl / DXCron.pm

diff --git a/perl/DXCron.pm b/perl/DXCron.pm
index d2a109332aa2a89206b72463ba27af618bb25849..5cccfc491d5bba66a0431986fe3cc38f4c1a5479 100644 (file)
--- a/perl/DXCron.pm
+++ b/perl/DXCron.pm
@@ -72,7 +72,7 @@ sub cread
                my ($min, $hour, $mday, $month, $wday, $cmd) = /^\s*(\S+)\s+(\S+)\s+(\S+)\s+(\S+)\s+(\S+)\s+(.+)$/o;
                next unless defined $min;
                my $ref = bless {};
-               my $err;
+               my $err = '';
 
                if (defined $min && defined $hour && defined $cmd) { # it isn't all of them, but should be enough to tell if this is a real line
                        $err .= parse($ref, 'min', $min, 0, 60);
@@ -305,7 +305,6 @@ sub spawn_cmd
                                 }
                                 for (@res) {
                                         if (ref $chan) {
-                                                dbg("send: $_");
                                                 $chan->send($_);
                                         } elsif (isdbg('cron')) {
                                                 dbg("$pkg::spawn_cmd: $_");
@@ -316,6 +315,7 @@ sub spawn_cmd
                                 diffms($pkg, "::spawn_cmd", $line, $t0, scalar @res) if isdbg('progress');
                         }
                        );
+       return ();
 }
 
 # do an rcmd to another cluster from the crontab