[LON-CAPA-cvs] cvs: CVSROOT / cvs2rss.pl

[albertel]

albertel		Tue Jan 23 16:30:10 2007 EDT

  Modified files:              
    /CVSROOT	cvs2rss.pl 
  Log:
  - some speed ups for rss geenration
  
  
Index: CVSROOT/cvs2rss.pl
diff -u CVSROOT/cvs2rss.pl:1.11 CVSROOT/cvs2rss.pl:1.12
--- CVSROOT/cvs2rss.pl:1.11	Tue Oct 25 10:09:48 2005
+++ CVSROOT/cvs2rss.pl	Tue Jan 23 16:30:08 2007
@@ -34,7 +34,7 @@
 my $emailDomain = "loncapa.org";
 my $channelTitle = "Lon-CAPA RSS Feed";
 my $channelLink = "http://install.loncapa.org/loncapa.rss";
-my $numEntries = 200;
+my $numEntries = 30;
 
 # Set this to 1 to enable cvs rdiff
 my $cvsDiff = 1;
@@ -103,7 +103,9 @@
 	# This will rdiff it against the previous version, and
 	# include that diff in the rss feed
 
-	if (($title[1] != "NONE") && ($title[0]=~/(.*).(pm|pl|conf|tab)$/)){
+	if (($title[1] != "NONE") 
+	    && ($title[0]=~/(.*)\.(pm|pl|conf|tab)$/)
+	    && ($title[0]!~|/localize/localize/..\.pm|) ) {
 	    my $tmpFile = "/tmp/diff.$$";
 	    my $cmdLine = "cvs -n rdiff -u -kk -r " . $title[1] .  " -r " . $title[2] . " " . $title[0] . ">" . $tmpFile;
 	    system($cmdLine);