diff options
| author | terry%mozilla.org <> | 1999-09-30 07:51:30 +0200 |
|---|---|---|
| committer | terry%mozilla.org <> | 1999-09-30 07:51:30 +0200 |
| commit | 8485e0fd41d15b0fbd96bc257ec0f95921aee79d (patch) | |
| tree | 958e6a9bace04a39989e949c79a8beecc1cec47d | |
| parent | 88237e94f95eca314e02d2fc233630be38d590fb (diff) | |
| download | bugzilla-8485e0fd41d15b0fbd96bc257ec0f95921aee79d.tar.gz bugzilla-8485e0fd41d15b0fbd96bc257ec0f95921aee79d.tar.xz | |
Patch by holger@holger.om.org (Holger Schurig) -- cope if Chart::Lines module is unavailable.
| -rwxr-xr-x | reports.cgi | 6 |
1 files changed, 4 insertions, 2 deletions
diff --git a/reports.cgi b/reports.cgi index 0b78969af..2293dd77b 100755 --- a/reports.cgi +++ b/reports.cgi @@ -27,7 +27,7 @@ use diagnostics; use strict; -use Chart::Lines; +eval "use Chart::Lines"; require "CGI.pl"; require "globals.pl"; @@ -114,7 +114,9 @@ FIN sub choose_product { my $product_popup = make_options (\@myproducts, $myproducts[0]); - my $charts = (-d $dir) ? "<option value=\"show_chart\">Bug Charts" : ""; + my $charts = defined $Chart::Lines::VERSION && -d $dir ? "<option value=\"show_chart\">Bug Charts" : ""; + # get rid of warning: + $Chart::Lines::VERSION = $Chart::Lines::VERSION; print <<FIN; <center> |