--- doc/install/redhat7.3/install.pl	2002/12/12 22:17:27	1.13
+++ 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.13 2002/12/12 22:17:27 matthew Exp $
+# $Id: install.pl,v 1.15 2002/12/18 16:34:09 matthew Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -87,7 +87,7 @@ my $result;
 my $test;
 
 # note: The filehandle LOG is global.
-open LOG,">/tmp/loncapa_install.log" || die "Unable to open log file.\n";
+open LOG,">loncapa_install.log" || die "Unable to open log file.\n";
 
 # Some friendly subroutines
 sub die_if_nonempty {
@@ -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 {