From d37641f813340e028e30212b8a4d4591c432f335 Mon Sep 17 00:00:00 2001
From: "endico%mozilla.org" <endico%mozilla.org>
Date: Sat, 27 Mar 1999 06:18:16 +0000
Subject: [PATCH] oops was printing the oldest 15 to the rdf file, not the
 newest

---
 webtools/newsbot/newsbot.pl | 11 ++++++-----
 1 file changed, 6 insertions(+), 5 deletions(-)

diff --git a/webtools/newsbot/newsbot.pl b/webtools/newsbot/newsbot.pl
index b2df1f63ed4..b4fb1bba549 100755
--- a/webtools/newsbot/newsbot.pl
+++ b/webtools/newsbot/newsbot.pl
@@ -184,11 +184,12 @@ RDFHEAD
 print $header;
 
 my $index =  @articles - 1;
-if ( $index > 15) {
-    $index = 15;
-    }
-for (my $i=$index; $i > 0 ; $i--) {
-#may need to substitute &amp;lt; for &lt; since rdf adds extra layer
+# only print newest 15 articles
+my $min = 0;
+if ($index > 15) {
+    $min = $index - 15;
+}
+for (my $i=$index; $i > $min ; $i--) {
     print ("  <item>\n");
     print ("    <title>" . $articles[$i]->{'Subject'} . "</title>\n");
     print ("    <link>http://www.dejanews.com/[LB=http://www.mozilla.org/]/msgid.xp?MID=&lt;" . $articles[$i]->{'Message-ID'} . "&gt;</link>\n");