--- doc/install/redhat7.3/install.pl 2002/12/18 16:11:09 1.14 +++ doc/install/redhat7.3/install.pl 2002/12/18 16:34:09 1.15 @@ -2,7 +2,7 @@ # The LearningOnline Network # Red Hat 7.3 installation script # -# $Id: install.pl,v 1.14 2002/12/18 16:11:09 matthew Exp $ +# $Id: install.pl,v 1.15 2002/12/18 16:34:09 matthew Exp $ # # Copyright Michigan State University Board of Trustees # @@ -433,12 +433,15 @@ print_and_log("\n"); ## ## Retrieve loncapa.tar.gz ## -if (! -e "$instdir/loncapa-current.tar.gz") { - print_and_log("Retrieving LON-CAPA source files from install.loncapa.org\n"); - system("wget http://install.loncapa.org/versions/loncapa-current.tar.gz 2>/dev/null 1>/dev/null"); - if (! -e "./loncapa-current.tar.gz") { +my $lctarball = 'loncapa-current.tar.gz'; +if (! -e "$instdir/$lctarball") { + print_and_log("Retrieving LON-CAPA source files from install.loncapa.org\n") +; + system("wget http://install.loncapa.org/versions/$lctarball 2>/dev/null 1>/d +ev/null"); + if (! -e "./$lctarball") { die("Unable to retrieve LON-CAPA source files from\n". - "http://install.loncapa.org/versions/loncapa-current.tar.gz\n"); + "http://install.loncapa.org/versions/$lctarball\n"); } print_and_log("\n"); } else {