removed some debug lines

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

diff --git a/src/Modules/Freshmeat.pl b/src/Modules/Freshmeat.pl
index fe3de4466c00837da3b97df2f7e278cfe24370f8..c74d392bc617e884f2e998b4c6274cd652ff644f 100644 (file)
--- a/src/Modules/Freshmeat.pl
+++ b/src/Modules/Freshmeat.pl
@@ -1,7 +1,7 @@
 #
 # Freshmeat.pl: Frontend to www.freshmeat.net
 #       Author: dms
-#      Version: v0.7c (20000606)
+#      Version: v0.7d (20000923)
 #      Created: 19990930
 #
 
@@ -104,9 +104,9 @@ sub downloadIndex {
     if (&main::isStale($idx, 1)) {
        &main::status("Freshmeat: fetching data.");
        foreach (keys %urls) {
-           &main::DEBUG("FM: urls{$_} => '$urls{$_}'.");
            my $retval = &main::getURLAsFile($urls{$_}, $idx);
-           next if ($retval eq "403");
+           next if ($retval =~ /^(403|500)$/);
+
            &main::DEBUG("FM: last! retval => '$retval'.");
            last;
        }