From: dms <dms@c11ca15a-4712-0410-83d8-924469b57eb5>
Date: Sat, 23 Sep 2000 12:46:21 +0000 (+0000)
Subject: removed some debug lines
X-Git-Url: https://git.donarmstrong.com/?a=commitdiff_plain;h=a1cde6d06831b5401d05f2b059d9e3914e71f5cd;p=infobot.git

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 fe3de44..c74d392 100644
--- 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;
 	}