[med-svn] r2342 - trunk/community/talks/200808_debconf8

[tille at alioth.debian.org]

Author: tille
Date: 2008-07-27 18:32:48 +0000 (Sun, 27 Jul 2008)
New Revision: 2342

Modified:
   trunk/community/talks/200808_debconf8/get-archive-pages
Log:
Obtain more lists


Modified: trunk/community/talks/200808_debconf8/get-archive-pages
===================================================================
--- trunk/community/talks/200808_debconf8/get-archive-pages	2008-07-27 17:33:45 UTC (rev 2341)
+++ trunk/community/talks/200808_debconf8/get-archive-pages	2008-07-27 18:32:48 UTC (rev 2342)
@@ -7,11 +7,11 @@
 use DBI;
 
 my $BASEURL  = "http://lists.debian.org/debian" ;
-my @PROJECTS = ('med', 'edu', 'jr') ;
+my @PROJECTS = ('med', 'edu', 'jr', 'accessibility', 'desktop', 'enterprise', 'lex', 'nonprofit') ;
 my @MONTHES  = ('01', '02', '03', '04', '05', '06', '07', '08', '09', '10', '11', '12');
 my @ROBOTS   = ('Debian Installer', 'bugzilla-skolelinux', 'Archive Administrator', 'hostmaster',
                 'Debian-med-request', 'Debian testing watch', 'Debian Bug Tracking System',
-                'Skolelinux archive Installer');
+                'Skolelinux archive Installer', 'Debian Wiki');
 my @SPAMAUTHORS = ('Pls check this new site');
 
 # Debian-Jr starts in 2000
@@ -142,7 +142,7 @@
 				} else {
 				    $url = '';
 				}
-				print HTMLSNIP "$messages Messages (counted $messagelines)\n";
+				print HTMLSNIP "$messages Messages ($messagelines real messages, $spamlines SPAM, $robotlines messages by robots)\n";
 				if ( $messages != $messagelines + $spamlines + $robotlines ) {
 				    print "Warning: $project $year/$month counted $messagelines Messages, $spamlines SPAM and $robotlines robots but page says $messages\n";
 				}