From 0922bcf5c61f8fca804c85a2a6ec8aeebf2f6600 Mon Sep 17 00:00:00 2001 From: ivan Date: Sat, 4 Dec 2010 23:54:24 +0000 Subject: RTx-Statistics in 2.1 / 3.8 --- rt/html/RTx/Statistics/DayOfWeek/Elements/Chart | 26 ------------------------- 1 file changed, 26 deletions(-) delete mode 100755 rt/html/RTx/Statistics/DayOfWeek/Elements/Chart (limited to 'rt/html/RTx/Statistics/DayOfWeek/Elements/Chart') diff --git a/rt/html/RTx/Statistics/DayOfWeek/Elements/Chart b/rt/html/RTx/Statistics/DayOfWeek/Elements/Chart deleted file mode 100755 index 239c09541..000000000 --- a/rt/html/RTx/Statistics/DayOfWeek/Elements/Chart +++ /dev/null @@ -1,26 +0,0 @@ -% $r->content_type("image/$format"); -% $m->print($graph->plot(\@data)->$format()); -% $m->abort(); -<&|/l, $#data+1&>[_1] Elements:

-% for (0..$#data) { -<% $data[$_] %>

-% } -<%INIT> -use GD::Graph::bars; - -my @data; -my $graph = GD::Graph::bars->new($Statistics::GraphWidth,$Statistics::GraphHeight); -$graph->set(export_format => "png", - x_label => 'Day of Week', - y_label => 'Ticket actions per Day by type'); -$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}]; - -my $format = $graph->export_format; -$r->content_type("image/$format"); - -<%ARGS> - -- cgit v1.2.1