From 6a64cd597b36411fa01d681c693786750b68c92c Mon Sep 17 00:00:00 2001 From: "myk%mozilla.org" <> Date: Tue, 5 Nov 2002 09:53:59 +0000 Subject: Fix for bug 156548: XUL implementation of duplicates report. --- collectstats.pl | 17 +++++++++++++++++ 1 file changed, 17 insertions(+) (limited to 'collectstats.pl') diff --git a/collectstats.pl b/collectstats.pl index 8caf92d77..61e7cf204 100755 --- a/collectstats.pl +++ b/collectstats.pl @@ -53,6 +53,23 @@ foreach (@myproducts) { &calculate_dupes(); +# Generate a static RDF file containing the default view of the duplicates data. +open(CGI, "REQUEST_METHOD=GET QUERY_STRING=ctype=rdf ./duplicates.cgi |") + || die "can't fork duplicates.cgi: $!"; +open(RDF, ">data/duplicates.tmp") + || die "can't write to data/duplicates.tmp: $!"; +my $headers_done = 0; +while () { + print RDF if $headers_done; + $headers_done = 1 if $_ eq "\n"; +} +close CGI; +close RDF; +if (-s "data/duplicates.tmp") { + rename("data/duplicates.rdf", "data/duplicates-old.rdf"); + rename("data/duplicates.tmp", "data/duplicates.rdf"); +} + sub check_data_dir { my $dir = shift; -- cgit v1.2.3-24-g4f1b