glenn 2005/02/07 06:53:38
Modified: jk/tools/reports tomcat_reports.pl
Log:
Improve error reporting if graph plot fails
Revision Changes Path
1.5 +8 -8
jakarta-tomcat-connectors/jk/tools/reports/tomcat_reports.pl
Index: tomcat_reports.pl
===================================================================
RCS file:
/home/cvs/jakarta-tomcat-connectors/jk/tools/reports/tomcat_reports.pl,v
retrieving revision 1.4
retrieving revision 1.5
diff -u -r1.4 -r1.5
--- tomcat_reports.pl 24 Feb 2004 08:42:04 -0000 1.4
+++ tomcat_reports.pl 7 Feb 2005 14:53:38 -0000 1.5
@@ -218,7 +218,7 @@
$graph->set_y_axis_font(GD::gdSmallFont);
$graph->set_legend_font(GD::gdSmallFont);
$gd = $graph->plot([EMAIL PROTECTED]);
- die "\$gd not defined" unless defined $gd;
+ die "Graph Plot Failed: " . $graph->error unless defined $gd;
open IMG, ">$outfile" or die $!;
print IMG $gd->png or die $gd->error;
@@ -261,7 +261,7 @@
$graph->set_y_axis_font(GD::gdSmallFont);
$graph->set_legend_font(GD::gdSmallFont);
$gd = $graph->plot([EMAIL PROTECTED]);
- die "\$gd not defined" unless defined $gd;
+ die "Graph Plot Failed: " . $graph->error unless defined $gd;
open IMG, ">$outfile" or die $!;
print IMG $gd->png or die $gd->error;
@@ -301,7 +301,7 @@
$graph->set_y_axis_font(GD::gdSmallFont);
$graph->set_legend_font(GD::gdSmallFont);
$gd = $graph->plot([EMAIL PROTECTED]);
- die "\$gd not defined" unless defined $gd;
+ die "Graph Plot Failed: " . $graph->error unless defined $gd;
open IMG, ">$outfile" or die $!;
print IMG $gd->png or die $gd->error;
@@ -349,7 +349,7 @@
$graph->set_y_axis_font(GD::gdSmallFont);
$graph->set_legend_font(GD::gdSmallFont);
$gd = $graph->plot([EMAIL PROTECTED]);
- die "\$gd not defined" unless defined $gd;
+ die "Graph Plot Failed: " . $graph->error unless defined $gd;
open IMG, ">$outfile" or die $!;
print IMG $gd->png or die $gd->error;
@@ -397,7 +397,7 @@
$graph->set_y_axis_font(GD::gdSmallFont);
$graph->set_legend_font(GD::gdSmallFont);
$gd = $graph->plot([EMAIL PROTECTED]);
- die "\$gd not defined" unless defined $gd;
+ die "Graph Plot Failed: " . $graph->error unless defined $gd;
open IMG, ">$outfile" or die $!;
print IMG $gd->png or die $gd->error;
---------------------------------------------------------------------
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
