![[BACK]](/icons/back.gif){kind=icon}
Return to install.pl CVS log ![[TXT]](/icons/text.gif){kind=icon}
![[DIR]](/icons/dir.gif){kind=icon}
Up to [LON-CAPA] / doc / install / redhat7.3|
Return to install.pl CVS log | Up to [LON-CAPA] / doc / install / redhat7.3 |
| version 1.20, 2003/04/30 20:59:57 | version 1.21, 2003/08/05 15:05:28 |
|---|---|
| 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)=@_; |