diff options
| author | des <des@FreeBSD.org> | 2003-07-18 07:24:13 +0000 |
|---|---|---|
| committer | des <des@FreeBSD.org> | 2003-07-18 07:24:13 +0000 |
| commit | 23627a92716867e074bb3b009f5e42e03965e5a5 (patch) | |
| tree | 6d5169e6d11fae074bfee0eaf7e038aebc48124e /tools | |
| parent | 64c9528c46ed1b58d40c5e618fc3d7fd76eb5d5f (diff) | |
| download | FreeBSD-src-23627a92716867e074bb3b009f5e42e03965e5a5.zip FreeBSD-src-23627a92716867e074bb3b009f5e42e03965e5a5.tar.gz | |
Generate index.html in the same directory.
Diffstat (limited to 'tools')
| -rw-r--r-- | tools/tools/tinderbox/www/index.cgi | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/tools/tools/tinderbox/www/index.cgi b/tools/tools/tinderbox/www/index.cgi index d9d4de2..fc42e79 100644 --- a/tools/tools/tinderbox/www/index.cgi +++ b/tools/tools/tinderbox/www/index.cgi @@ -68,7 +68,9 @@ MAIN:{ $| = 1; print "Content-Type: text/html\n\n"; } else { - open(STDOUT, ">", "index.html") + my $fn = $0; + $fn =~ s/cgi$/html/; + open(STDOUT, ">", $fn) or die("index.html: $!\n"); } print "<?xml version=\"1.0\" encoding=\"iso-8859-1\"?> |
