[LON-CAPA-cvs] cvs: loncom /build install_web_site_cronjob doc/build generate_web_pages.pl

[albertel]

albertel		Tue Jul  6 11:39:54 2004 EDT

  Modified files:              
    /doc/build	generate_web_pages.pl 
    /loncom/build	install_web_site_cronjob 
  Log:
  - trying to add a configuarable 'testin release section' to the install webpages
  
  
Index: doc/build/generate_web_pages.pl
diff -u doc/build/generate_web_pages.pl:1.7 doc/build/generate_web_pages.pl:1.8
--- doc/build/generate_web_pages.pl:1.7	Wed May 12 14:19:54 2004
+++ doc/build/generate_web_pages.pl	Tue Jul  6 11:39:53 2004
@@ -87,6 +87,14 @@
 http://install.lon-capa.org/versions/loncapa-current.tar.gz</a>
 (version LATESTVERSION).
 </p>
+TESTINGRELEASE_START
+<p>
+You can download the <b>testing version of the upcoming LON-CAPA</b> at
+<a href="http://install.lon-capa.org/versions/loncapa-testing.tar.gz">
+http://install.lon-capa.org/versions/loncapa-testing.tar.gz</a>
+(version LATESTTESTINGVERSION release on LATESTTESTINGDATE).
+</p>
+TESTINGRELEASE_END
 <p>
 The <b>development release of LON-CAPA</b> is at:
 <a href="http://install.lon-capa.org/versions/loncapa-unstable.tar.gz">
Index: loncom/build/install_web_site_cronjob
diff -u loncom/build/install_web_site_cronjob:1.6 loncom/build/install_web_site_cronjob:1.7
--- loncom/build/install_web_site_cronjob:1.6	Mon Feb  3 13:03:52 2003
+++ loncom/build/install_web_site_cronjob	Tue Jul  6 11:39:53 2004
@@ -92,6 +92,7 @@
 END
 close(OUT);
 
+#'
 # Roll the directory together into the unstable tarball.
 `cd /home/loninst/auto; ln -s loncapa loncapa-unstable; tar cvvf loncapa-unstable.tar loncapa-unstable/* ;gzip -9 -f loncapa-unstable.tar`;
 
@@ -130,3 +131,31 @@
 open(OUT,">/home/loninst/public_html/docs/downloads/index.html");
 print(OUT $text);
 close(OUT);
+
+#'
+# ---------------------------------------- Determine the latest testing version
+my $filename=`cd /home/loninst/public_html/versions; find . -type f -name LATEST-TESTING-IS-* -maxdepth 1`;
+chomp($filename);
+$filename =~ /LATEST-TESTING-IS-(.*)/;
+my $version = $1;
+if ($version) {
+    open(IN,"</home/loninst/public_html/versions/$filename");
+    my $releasedate = <IN>;
+    close(IN);
+    # -------------- Updating the download page with the date of the last build
+    open(IN,"</home/loninst/public_html/docs/downloads/index.html");
+    my @lines = <IN>;
+    close(IN);
+    my $date = `date -I`; chomp($date);
+    my $text = join('',@lines);
+    $text =~ s/loncapa-unstable\.tar\.gz\<\/a\>.*?\./loncapa-unstable\.tar\.gz\<\/a\> (generated $date)\./;
+    $text =~ s/LATESTTESTINGVERSION/$version/g;
+    $text =~ s/LATESTTESTINGDATE/$releasedate/g;
+    $text =~ s/TESTINGRELEASE_START//g;
+    $text =~ s/TESTINGRELEASE_END//g;
+    open(OUT,">/home/loninst/public_html/docs/downloads/index.html");
+    print(OUT $text);
+    close(OUT);
+} else {
+    $text =~ s/TESTINGRELEASE_START.*TESTINGRELEASE_END//g;
+}