--- loncom/build/install_web_site_cronjob 2004/07/06 15:39:53 1.7 +++ loncom/build/install_web_site_cronjob 2004/07/06 15:44:07 1.8 @@ -138,24 +138,22 @@ my $filename=`cd /home/loninst/public_ht chomp($filename); $filename =~ /LATEST-TESTING-IS-(.*)/; my $version = $1; +open(IN,"; +close(IN); +# -------------- Updating the download page with the date of the last build +open(IN,"; +close(IN); +my $text = join('',@lines); if ($version) { - open(IN,"; - close(IN); - # -------------- Updating the download page with the date of the last build - open(IN,"; - close(IN); - my $date = `date -I`; chomp($date); - my $text = join('',@lines); - $text =~ s/loncapa-unstable\.tar\.gz\<\/a\>.*?\./loncapa-unstable\.tar\.gz\<\/a\> (generated $date)\./; $text =~ s/LATESTTESTINGVERSION/$version/g; $text =~ s/LATESTTESTINGDATE/$releasedate/g; $text =~ s/TESTINGRELEASE_START//g; $text =~ s/TESTINGRELEASE_END//g; - open(OUT,">/home/loninst/public_html/docs/downloads/index.html"); - print(OUT $text); - close(OUT); } else { $text =~ s/TESTINGRELEASE_START.*TESTINGRELEASE_END//g; } +open(OUT,">/home/loninst/public_html/docs/downloads/index.html"); +print(OUT $text); +close(OUT);