From d4d34ee53d2ca6c6a685006e0cd7ab5121e010dc Mon Sep 17 00:00:00 2001 From: "gerv%gerv.net" <> Date: Mon, 2 Jul 2001 02:09:29 +0000 Subject: Make bug chart filenames other-OS friendly by removing colons. Bug 88179. r=jake. --- reports.cgi | 16 +++------------- 1 file changed, 3 insertions(+), 13 deletions(-) (limited to 'reports.cgi') diff --git a/reports.cgi b/reports.cgi index 163f583c8..c76a411f7 100755 --- a/reports.cgi +++ b/reports.cgi @@ -525,23 +525,13 @@ sub chart_image_type { sub chart_image_name { my ($data_file, $type) = @_; - my $id = datasets_id($FORM{datasets}); - my $doy = day_of_year(); + # Cache charts by generating a unique filename based on what they + # show. Charts should be deleted by collectstats.pl nightly. + my $id = join ("_", split (":", $FORM{datasets})); return "${data_file}_${id}.$type"; } -# Cache charts by generating a unique filename based on what they -# show. Charts should be deleted by collectstats.pl nightly. -sub datasets_id { - # Current method is very long filenames... - my $longname = ""; - foreach (@_) { - $longname .= $_; - } - return $longname; -} - sub day_of_year { my ($mday, $month, $year) = (localtime())[3 .. 5]; $month += 1; -- cgit v1.2.3-24-g4f1b