yangtse: curl-www/auto summarize.pl,1.59,1.60 update.pl,1.4,1.5

[email protected] Thu, 01 Oct 2009 13:25:37 +0000
Newsgroups gmane.comp.web.curl.www.cvs
Message-ID <[email protected]>
Update of /cvsroot/curl/curl-www/auto
In directory giant.haxx.se:/var/tmp/cvs-serv5272/auto

Modified Files:
	summarize.pl update.pl 
Log Message:
More selective specification of the daily build log file name

Index: update.pl
===================================================================
RCS file: /cvsroot/curl/curl-www/auto/update.pl,v
retrieving revision 1.4
retrieving revision 1.5
diff -u -d -r1.4 -r1.5
--- update.pl	25 Sep 2009 14:10:38 -0000	1.4
+++ update.pl	1 Oct 2009 13:25:35 -0000	1.5
@@ -1,7 +1,7 @@
 #!/usr/bin/perl
 
 opendir(DIR, "inbox");
-my @logs = grep { /^inbox/ } readdir(DIR);
+my @logs = grep { /^inbox.*log$/ } readdir(DIR);
 closedir DIR;
 
 map {$logfile{$_}="p";} (@logs);
@@ -46,7 +46,7 @@
     system('find inbox -mtime +15 -exec rm {} \;');
 
     # build md5 checksum file
-    system("md5sum inbox/inbox* > md5");
+    system("md5sum inbox/inbox*log > md5");
 
     # build the summary
     system("nice ./summarize.pl");

Index: summarize.pl
===================================================================
RCS file: /cvsroot/curl/curl-www/auto/summarize.pl,v
retrieving revision 1.59
retrieving revision 1.60
diff -u -d -r1.59 -r1.60
--- summarize.pl	17 Jul 2009 04:19:15 -0000	1.59
+++ summarize.pl	1 Oct 2009 13:25:35 -0000	1.60
@@ -7,7 +7,7 @@
 require "ccwarn.pm";
 
 opendir(DIR, "inbox");
-my @logs = grep { /^inbox/ } readdir(DIR);
+my @logs = grep { /^inbox.*log$/ } readdir(DIR);
 closedir(DIR);
 
 my $prefix ="table";