diff options
Diffstat (limited to 'rt/html/RTx/Statistics/OpenStalled/Elements/Chart')
-rwxr-xr-x | rt/html/RTx/Statistics/OpenStalled/Elements/Chart | 27 |
1 files changed, 0 insertions, 27 deletions
diff --git a/rt/html/RTx/Statistics/OpenStalled/Elements/Chart b/rt/html/RTx/Statistics/OpenStalled/Elements/Chart deleted file mode 100755 index 9505881e8..000000000 --- a/rt/html/RTx/Statistics/OpenStalled/Elements/Chart +++ /dev/null @@ -1,27 +0,0 @@ -<%perl> -$r->content_type("image/$format"); -print $graph->plot(\@data)->$format(); -$m->abort(); -print $#data+1 . " Elements:<p>"; -for (0..$#data) { -print $data[$_]; -print "<p>"; -} -</%perl> -<%INIT> -use GD::Graph::bars; - -my @data; -my $graph = GD::Graph::bars->new($Statistics::GraphWidth,$Statistics::GraphHeight); -$graph->set(export_format => "png", - x_label => 'Queue name', - y_label => 'Total per queue by status'); -my $format = $graph->export_format; -$graph->set_legend(split /,/ , $ARGS{set_legend}); -push @data, [split /,/ , $ARGS{x_labels}]; -push @data, [split /,/ , $ARGS{data1}]; -push @data, [split /,/ , $ARGS{data2}]; -push @data, [split /,/ , $ARGS{data3}]; -</%INIT> -<%ARGS> -</%ARGS> |