--- doc/build/generate_web_pages.pl	2006/06/06 15:13:42	1.28
+++ doc/build/generate_web_pages.pl	2011/06/01 06:34:47	1.50
@@ -21,19 +21,37 @@ The point of this is to look like the ma
 # add/subtract/etc. pages. Index is done seperately.
 # Title, source
 
-my @pages = ( 
-#	      ['Red Hat 7.3 Install', 'rh73'],
-#	      ['Fedora Install', 'fedora_install'],
-              ['Fedora Core 3 Install', 'FC3_install'],
-              ['Fedora Core 4 Install', 'FC4_install'],
+my @longlifecycle = (
+              ['CentOS Linux 5 Install','centos5_install'],
+              ['Scientific Linux 6 Install','scientific6_install'],
+              ['Scientific Linux 5 Install','scientific5_install'],
+              ['Red Hat Enterprise Linux 6 Install','RHEL6_install'],
+              ['Red Hat Enterprise Linux 5 Install','RHEL5_install'],
               ['Red Hat Enterprise Linux 4 Install','RHEL4_install'],
-              ['SuSE Linux Professional 9.2 Install', 'suse9.2_install'],
-              ['SuSE Linux Professional 9.3 Install', 'suse9.3_install'],
+              ['SuSE Linux Enterprise Server 11 Install', 'sles11_install'],
+              ['SuSE Linux Enterprise Server 10 Install', 'sles10_install'],
               ['SuSE Linux Enterprise Server 9 Install', 'sles9_install'],
-#	      ['Manual Install from Tarballs', 'manual_install'],
-	      ['Upgrading from Previous LON-CAPA install', 'upgrade'],
-	      ['LON-CAPA License (Gnu Public License)', 'license']
 	      );
+
+my @shortlifecycle = (
+              ['Fedora 15 Install', 'F15_install'],
+              ['Fedora 14 Install', 'F14_install'],
+              ['Fedora 13 Install', 'F13_install'],
+              ['Fedora 12 Install', 'F12_install'],
+              ['Fedora 11 Install', 'F11_install'],
+              ['Fedora 10 Install', 'F10_install'],
+              ['Fedora 9 Install', 'F9_install'],
+              ['SuSE Linux 11.4 Install', 'suse11.4_install'],
+              ['SuSE Linux 11.3 Install', 'suse11.3_install'],
+              ['SuSE Linux 11.2 Install', 'suse11.2_install'],
+              ['SuSE Linux 11.1 Install', 'suse11.1_install'],
+              );
+ 
+my @ancillary = (
+              ['Upgrading from Previous LON-CAPA install', 'upgrade'],
+              ['LON-CAPA License (Gnu Public License)', 'license']
+              );
+
 my @other_pages = ( 
 		    ['Developer Information', 'dev'],
 		    ['Configuration Information', 'config'],
@@ -72,20 +90,45 @@ working, here is some <a href="config.ht
 LON-CAPA</a>.</p>
 
 <hr />
+<h3>Supported Linux Distros</h3>
 PRELUDE
 
-$content .= "<ul>\n";
-for (@pages) {
+$content .= '<p>LON-CAPA is supported on a variety of Linux distributions.</p>'."\n".
+             '<p>In the list below these are divided into distros with a long
+life cycle, i.e., those for which a particular version is supported by the distributor for 5 years or more, and those with a short life cycle, i.e., those for which a particular versions is supported for up to 18 months.</p>'.     
+            '<div style="float: left;">'.
+            '<b>Long life cycle</b><br />'.
+            '<ul>'."\n";
+for (@longlifecycle) {
+    $content .= "<li><a href='$_->[1].html'>$_->[0]</a></li>\n";
+}
+$content .= '</ul></div>'."\n".
+            '<div style="float: left;">'.
+            '<b>Short life cycle</b><br />'.
+            '<ul>'."\n";
+for (@shortlifecycle) {
     $content .= "<li><a href='$_->[1].html'>$_->[0]</a></li>\n";
 }
+$content .= '</ul></div><br clear="all" />'."\n".
+            '<b>Additional information</b><ul>'."\n";
+for (@ancillary) {
+    $content .= "<li><a href='$_->[1].html'>$_->[0]</a></li>\n";
+}
+$content .= '</ul><br />';
 
-$content .= "</ul>\n";
 
-open(RELEASE, '<', "release.frag");
-$content .= join('',<RELEASE>);
-close(RELEASE);
+my $testing_content = '';
+if (@testing_pages) {
+    $testing_content .= "<hr/><p>Installation on the following systems requires the use of a testing release of LON-CAPA.</p>\n";
+    $testing_content .= "<ul>\n";
+    for (@testing_pages) {
+	$testing_content .= "<li><a href='$_->[1].html'>$_->[0]</a></li>\n";
+    }
+    $testing_content .= "</ul>\n";
+}
+
 
-$content .= <<'POSTLUDE';
+$content .= <<"POSTLUDE";
 <hr />
 <a name="download" />
 <h3>Downloading LON-CAPA</h3>
@@ -111,12 +154,19 @@ You can download the <b>testing version
 http://install.lon-capa.org/versions/loncapa-testing.tar.gz</a>
 (version LATESTTESTINGVERSION).
 </p>
+$testing_content
 TESTINGRELEASE_END
 
 <hr />
 POSTLUDE
 
+open(RELEASE, '<', "release.frag");
+$content .= join('',<RELEASE>);
+close(RELEASE);
+
 $content .= "<ul>\n";
+my @testing_pages = ( 
+		      );
 for (@other_pages) {
     $content .= "<li><a href='$_->[1].html'>$_->[0]</a></li>\n";
 }
@@ -132,7 +182,7 @@ print INDEX $index;
 close INDEX;
 
 # Build the pages
-for (@pages,@other_pages) {
+for (@pages,@other_pages,@testing_pages) {
     my ($title, $source) = @$_;
 
     # read in content