bagder: curl-www last20threads.pl,1.12,1.13

[email protected]
Newsgroups gmane.comp.web.curl.www.cvs
Message-ID <[email protected]>
Update of /cvsroot/curl/curl-www
In directory labb:/tmp/cvs-serv4537

Modified Files:
	last20threads.pl 
Log Message:
added curlpp stuff


Index: last20threads.pl
===================================================================
RCS file: /cvsroot/curl/curl-www/last20threads.pl,v
retrieving revision 1.12
retrieving revision 1.13
diff -u -d -r1.12 -r1.13
--- last20threads.pl	13 May 2005 14:57:19 -0000	1.12
+++ last20threads.pl	24 May 2005 22:06:34 -0000	1.13
@@ -10,13 +10,15 @@
                  'lib' => 'Library',
                  'curlphp' => 'PHP',
                  'curlpython' => 'Python',
-                 'tracker' => 'Tracker');
+                 'tracker' => 'Tracker',
+                 'curlpp' => 'cURLpp');
 
 my %listrealname = ('archive' => 'curl-users',
                     'lib' => 'curl-library',
                     'curlphp' => 'curl-and-php',
                     'curlpython' => 'curl-and-python',
-                    'tracker' => 'curl-tracker');
+                    'tracker' => 'curl-tracker',
+                    'curlpp' => 'curlpp');
 
 opendir(DIR, $tree) || die "can't opendir $tree: $!";
 my @archives = grep { /^(.*)-(\d\d\d\d)-(\d\d)$/ && -d "$tree/$_" } readdir(DIR);
@@ -220,6 +222,10 @@
         $s =~ s/^((Sv|Réf[. ]*|Re *|RE\.|Fwd|FW|Re\[(\d+)\]): *)*//ig;
         $s =~ s/[ \t\n]+/ /g;
 
+        # Here's a special to strip off the subject prefix of the curlpp
+        # mailing list:
+        $s =~ s/\[cURLpp\] *//g;
+
         $store{$s}++;
 
         if(!$inreplyto) {

_______________________________________________
http://cool.haxx.se/mailman/listinfo/curl-www-commits
lmpx.com only provides a reader for public news (NNTP) servers. It is not affiliated with the servers or forums shown here and is not responsible for the content of articles, which is written by their respective authors.