version 1.19, 2003/01/12 19:07:28
|
version 1.22, 2003/08/11 20:47:57
|
Line 89 my $test;
|
Line 89 my $test;
|
# note: The filehandle LOG is global. |
# note: The filehandle LOG is global. |
open LOG,">loncapa_install.log" || die "Unable to open log file.\n"; |
open LOG,">loncapa_install.log" || die "Unable to open log file.\n"; |
|
|
|
print LOG '$Id$'."\n"; |
|
|
# Some friendly subroutines |
# Some friendly subroutines |
sub die_if_nonempty { |
sub die_if_nonempty { |
my ($string,$error)=@_; |
my ($string,$error)=@_; |
Line 147 END
|
Line 149 END
|
print <<"END"; |
print <<"END"; |
******************************************************************** |
******************************************************************** |
|
|
Welcome to LON-CAPA 0.6.0 |
Welcome to LON-CAPA |
|
|
This script will install the base software that LON-CAPA needs to |
This script will install the base software that LON-CAPA needs to |
run properly. |
run properly. |
Line 223 my @misc_rpms = (
|
Line 225 my @misc_rpms = (
|
"$instdir/libcap-1.10-8.i386.rpm", |
"$instdir/libcap-1.10-8.i386.rpm", |
); |
); |
|
|
my $systemperl = "$instdir/LON-CAPA-systemperl-3.5-rh7.i386.rpm"; |
my $systemperl = "$instdir/LON-CAPA-systemperl-3.7-rh7.i386.rpm"; |
|
|
## |
## |
## Some of these rpm commands require being obnoxious (--force --nodeps) |
## Some of these rpm commands require being obnoxious (--force --nodeps) |