Diff for /doc/build/generate_web_pages.pl between versions 1.29 and 1.59

version 1.29, 2006/07/12 20:00:09 version 1.59, 2015/05/31 00:31:00
Line 21  The point of this is to look like the ma Line 21  The point of this is to look like the ma
 # add/subtract/etc. pages. Index is done seperately.  # add/subtract/etc. pages. Index is done seperately.
 # Title, source  # Title, source
   
 my @pages = (   my @longlifecycle = (
 #      ['Red Hat 7.3 Install', 'rh73'],                ['CentOS Linux 7 Install','centos7_install'],
 #      ['Fedora Install', 'fedora_install'],                ['CentOS Linux 6 Install','centos6_install'],
               ['Fedora Core 3 Install', 'FC3_install'],                ['CentOS Linux 5 Install','centos5_install'],
               ['Fedora Core 4 Install', 'FC4_install'],                ['Scientific Linux 7 Install','scientific7_install'],
                 ['Scientific Linux 6 Install','scientific6_install'],
                 ['Scientific Linux 5 Install','scientific5_install'],
                 ['Red Hat Enterprise Linux 7 Install','RHEL7_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'],                ['Red Hat Enterprise Linux 4 Install','RHEL4_install'],
               ['SuSE Linux Professional 9.2 Install', 'suse9.2_install'],                ['SuSE Linux Enterprise Server 12 Install', 'sles12_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'],                ['SuSE Linux Enterprise Server 9 Install', 'sles9_install'],
 #      ['Manual Install from Tarballs', 'manual_install'],                ['Ubuntu 14.04 LTS Server', 'ubuntu14LTS_install'],
       ['Upgrading from Previous LON-CAPA install', 'upgrade'],                ['Ubuntu 12.04 LTS Server', 'ubuntu12LTS_install'],
       ['LON-CAPA License (Gnu Public License)', 'license']                ['Ubuntu 10.04 LTS Server', 'ubuntu10LTS_install'],
                 ['Ubuntu 8.04 LTS Server', 'ubuntu8LTS_install'],
       );        );
   
 my @testing_pages = (   my @shortlifecycle = (
       ['Fedora Core 5 Install', 'FC5_install'],                ['Fedora 21 Install', 'F21_install'],
       );                ['Fedora 20 Install', 'F20_install'],
                 ['Fedora 19 Install', 'F19_install'],
                 ['Fedora 18 Install', 'F18_install'],
                 ['Fedora 17 Install', 'F17_install'],
                 ['Fedora 16 Install', 'F16_install'],
                 ['Fedora 15 Install', 'F15_install'],
                 ['Fedora 14 Install', 'F14_install'],
                 ['Fedora 13 Install', 'F13_install'],
                 ['SuSE Linux 13.2 Install', 'suse13.2_install'],
                 ['SuSE Linux 13.1 Install', 'suse13.1_install'],
                 ['SuSE Linux 12.3 Install', 'suse12.3_install'],
                 ['SuSE Linux 12.2 Install', 'suse12.2_install'],
                 ['SuSE Linux 12.1 Install', 'suse12.1_install'],
                 ['SuSE Linux 11.4 Install', 'suse11.4_install'],
                 );
    
   my @ancillary = (
                 ['Upgrading from Previous LON-CAPA install', 'upgrade'],
                 ['LON-CAPA License (Gnu Public License)', 'license']
                 );
   
 my @other_pages = (   my @other_pages = ( 
     ['Developer Information', 'dev'],      ['Developer Information', 'dev'],
     ['Configuration Information', 'config'],      ['Configuration Information', 'config'],
Line 71  easily done by installing on a dedicated Line 98  easily done by installing on a dedicated
 operating system.</p>  operating system.</p>
   
 <p>The configuring of LON-CAPA is part of the install process of the  <p>The configuring of LON-CAPA is part of the install process of the
 software. However, In case something needs to be altered, or isn't  software. However, in case something needs to be altered, or isn't
 working, here is some <a href="config.html">information on configuring  working, here is some <a href="config.html">information on configuring
 LON-CAPA</a>.</p>  LON-CAPA</a>.</p>
   
 <hr />  <hr />
   <h3>Supported Linux Distros</h3>
 PRELUDE  PRELUDE
   
 $content .= "<ul>\n";  $content .= '<p>LON-CAPA is supported on a variety of Linux distributions.</p>'."\n".
 for (@pages) {               '<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 version 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 .= "<li><a href='$_->[1].html'>$_->[0]</a></li>\n";
 }  }
   $content .= '</ul><br />';
   
 $content .= "</ul>\n";  
   
 my $testing_content;  my $testing_content = '';
 if (@testing_pages) {  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 .= "<hr/><p>Installation on the following systems requires the use of a testing release of LON-CAPA.</p>\n";
     $testing_content .= "<ul>\n";      $testing_content .= "<ul>\n";
Line 96  if (@testing_pages) { Line 141  if (@testing_pages) {
 }  }
   
   
 open(RELEASE, '<', "release.frag");  
 $content .= join('',<RELEASE>);  
 close(RELEASE);  
   
 $content .= <<"POSTLUDE";  $content .= <<"POSTLUDE";
 <hr />  <hr />
 <a name="download" />  <a name="download" />
Line 132  TESTINGRELEASE_END Line 173  TESTINGRELEASE_END
 <hr />  <hr />
 POSTLUDE  POSTLUDE
   
   open(RELEASE, '<', "release.frag");
   $content .= join('',<RELEASE>);
   close(RELEASE);
   
 $content .= "<ul>\n";  $content .= "<ul>\n";
   my @testing_pages = ( 
         );
 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 141  $content .= "</ul>\n"; Line 188  $content .= "</ul>\n";
   
 $links='<link rel="alternate" type="application/rss+xml" title="CVS RSS" href="loncapa.rss" />';  $links='<link rel="alternate" type="application/rss+xml" title="CVS RSS" href="loncapa.rss" />';
   
 my $index = replaceText("Install LON-CAPA", $links, "Install LON-CAPA",  my $index = replaceText("Install LON-CAPA", $links, '<font color="#006600" face="Arial, Helvetica, sans-serif">Documentation/Download</font>',
  $content);   $content);
   
 print INDEX $index;  print INDEX $index;
 close INDEX;  close INDEX;
   
 # Build the pages  # Build the pages
 for (@pages,@other_pages,@testing_pages) {  for (@longlifecycle,@shortlifecycle,@ancillary,@other_pages,@testing_pages) {
     my ($title, $source) = @$_;      my ($title, $source) = @$_;
   
     # read in content      # read in content
Line 156  for (@pages,@other_pages,@testing_pages) Line 203  for (@pages,@other_pages,@testing_pages)
     $content = join '', <SOURCE>;      $content = join '', <SOURCE>;
     close SOURCE;      close SOURCE;
   
     $content = replaceText($title, '', '<a href="/">Install LON-CAPA</a> &gt; ' . $title,      $content = replaceText($title, '', '<font face="Arial, Helvetica, sans-serif"><a href="/">Documentation/Download</a> &raquo; '.
                              '</font><font color="#006600" face="Arial, Helvetica, sans-serif">'.$title,
    $content);     $content);
     open DEST, '>', $source.'.html';      open DEST, '>', $source.'.html';
     print DEST $content;      print DEST $content;

Removed from v.1.29  
changed lines
  Added in v.1.59


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