debug messages removed

git-svn-id: https://svn.code.sf.net/p/infobot/code/trunk@165 c11ca15a-4712-0410-83d8-924469b57eb5

diff --git a/blootbot/src/Misc.pl b/blootbot/src/Misc.pl
index b75fd7e89b80476fc37fcc5cb8825962c3c6550b..43d4cf2918b4696200d8c225806885e1af5dbe0e 100644 (file)
--- a/blootbot/src/Misc.pl
+++ b/blootbot/src/Misc.pl
@@ -406,12 +406,10 @@ sub IsHostMatch {
 sub isStale {
     my ($file, $age) = @_;
 
-    &DEBUG("isStale: $file does not exist") unless ( -f $file);
     return 1 unless ( -f $file);
     return 1 if (time() - (stat($file))[9] > $age*60*60*24);
     my $delta = time() - (stat($file))[9];
     my $hage  = $age*60*60*24;
-    &DEBUG("isStale: not stale! $delta < $hage");
     return 0;
 }
 
@@ -601,8 +599,8 @@ sub Forker {
     if (&IsParam("forking") and $$ == $bot_pid) {
        return $noreply unless (&addForked($label));
        $SIG{CHLD} = 'IGNORE';
-       $pid = eval { fork() };  # catch non-forking OSes and other errors
-       return $noreply if $pid;   # parent does nothing
+       $pid = eval { fork() };
+       return $noreply if $pid;        # parent does nothing
        &status("fork starting for '$label', PID == $$.");
     }
 

diff --git a/blootbot/src/Net.pl b/blootbot/src/Net.pl
index 5a4f0a5774d9d938966593ef8762d7cbbd9b231e..fb1959cebab756fec93b7918d8c991904192b964 100644 (file)
--- a/blootbot/src/Net.pl
+++ b/blootbot/src/Net.pl
@@ -50,7 +50,7 @@ sub ftpGet {
     if ($size = $ftp->size($file)) {
        &status("FTP: file size is $size") if ($verbose_ftp);
        my $thisfile    = $file || $lfile;
-       &DEBUG("lfile => '$lfile'.");
+
        if ( -f $thisfile) {
            $lsize      = -s $thisfile;
            if ($_ != $lsize) {
@@ -76,7 +76,7 @@ sub ftpGet {
        &status("FTP: getting $file.") if ($verbose_ftp);
        $ftp->get($file);
     }
-    &DEBUG("FTP: remsize => '$size'.");
+
     if (defined $lsize) {
        &DEBUG("FTP: locsize => '$lsize'.");
        if ($size != $lsize) {