[BACK]Return to generate_web_pages.pl CVS log [TXT] [DIR] Up to [LON-CAPA] / doc / build

Diff for /doc/build/generate_web_pages.pl between versions 1.27 and 1.31

version 1.27, 2005/10/12 18:04:17 version 1.31, 2006/10/09 23:40:35
Line 22  The point of this is to look like the ma Line 22  The point of this is to look like the ma
 # Title, source  # Title, source
   
 my @pages = (   my @pages = ( 
 #      ['Red Hat 7.3 Install', 'rh73'],        ['Fedora Core 5 Install', 'FC5_install'],
 #      ['Fedora Install', 'fedora_install'],  
               ['Fedora Core 3 Install', 'FC3_install'],  
               ['Fedora Core 4 Install', 'FC4_install'],                ['Fedora Core 4 Install', 'FC4_install'],
   #             ['Fedora Core 3 Install', 'FC3_install'],
   #      ['Fedora Install', 'fedora_install'],
   #      ['Red Hat 7.3 Install', 'rh73'],
               ['Red Hat Enterprise Linux 4 Install','RHEL4_install'],                ['Red Hat Enterprise Linux 4 Install','RHEL4_install'],
               ['SuSE Linux Professional 9.2 Install', 'suse9.2_install'],                ['SuSE Linux 10.1 Install', 'suse10.1_install'],
               ['SuSE Linux Professional 9.3 Install', 'suse9.3_install'],                ['SuSE Linux Professional 9.3 Install', 'suse9.3_install'],
                 ['SuSE Linux Professional 9.2 Install', 'suse9.2_install'],
                 ['SuSE Linux Enterprise Server 10 Install', 'sles10_install'],
               ['SuSE Linux Enterprise Server 9 Install', 'sles9_install'],                ['SuSE Linux Enterprise Server 9 Install', 'sles9_install'],
 #      ['Manual Install from Tarballs', 'manual_install'],  #      ['Manual Install from Tarballs', 'manual_install'],
       ['Upgrading from Previous LON-CAPA install', 'upgrade'],        ['Upgrading from Previous LON-CAPA install', 'upgrade'],
       ['LON-CAPA License (Gnu Public License)', 'license']        ['LON-CAPA License (Gnu Public License)', 'license']
       );        );
   
   my @testing_pages = ( 
         );
 my @other_pages = (   my @other_pages = ( 
     ['Developer Information', 'dev'],      ['Developer Information', 'dev'],
     ['Configuration Information', 'config'],      ['Configuration Information', 'config'],
Line 81  for (@pages) { Line 87  for (@pages) {
   
 $content .= "</ul>\n";  $content .= "</ul>\n";
   
 $content .= <<'POSTLUDE';  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";
 <hr />  <hr />
 <a name="download" />  <a name="download" />
 <h3>Downloading LON-CAPA</h3>  <h3>Downloading LON-CAPA</h3>
Line 107  You can download the <b>testing version Line 124  You can download the <b>testing version
 http://install.lon-capa.org/versions/loncapa-testing.tar.gz</a>  http://install.lon-capa.org/versions/loncapa-testing.tar.gz</a>
 (version LATESTTESTINGVERSION).  (version LATESTTESTINGVERSION).
 </p>  </p>
   $testing_content
 TESTINGRELEASE_END  TESTINGRELEASE_END
   
 <hr />  <hr />
 POSTLUDE  POSTLUDE
   
   open(RELEASE, '<', "release.frag");
   $content .= join('',<RELEASE>);
   close(RELEASE);
   
 $content .= "<ul>\n";  $content .= "<ul>\n";
 for (@other_pages) {  for (@other_pages) {
     $content .= "<li><a href='$_->[1].html'>$_->[0]</a></li>\n";      $content .= "<li><a href='$_->[1].html'>$_->[0]</a></li>\n";
Line 128  print INDEX $index; Line 150  print INDEX $index;
 close INDEX;  close INDEX;
   
 # Build the pages  # Build the pages
 for (@pages,@other_pages) {  for (@pages,@other_pages,@testing_pages) {
     my ($title, $source) = @$_;      my ($title, $source) = @$_;
   
     # read in content      # read in content
Removed from v.1.27  
changed lines
  Added in v.1.31

FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>