version 1.29, 2006/07/12 20:00:09
|
version 1.30, 2006/08/21 21:43:47
|
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 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 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'], |
Line 36 my @pages = (
|
Line 37 my @pages = (
|
); |
); |
|
|
my @testing_pages = ( |
my @testing_pages = ( |
['Fedora Core 5 Install', 'FC5_install'], |
|
); |
); |
my @other_pages = ( |
my @other_pages = ( |
['Developer Information', 'dev'], |
['Developer Information', 'dev'], |
Line 85 for (@pages) {
|
Line 85 for (@pages) {
|
|
|
$content .= "</ul>\n"; |
$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 96 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 128 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"; |