diff options
author | Chris Mytton <self@hecticjeff.net> | 2013-09-06 16:30:50 +0100 |
---|---|---|
committer | Chris Mytton <self@hecticjeff.net> | 2013-09-06 16:30:50 +0100 |
commit | 3704a07ef4a94a7e20d01f9b5a9cdb8fcc449e89 (patch) | |
tree | 581e8375bdfec53c2627d82ef209063d7a5d7017 | |
parent | 04b187d5347dd2d26874a83902e51c2532ef8a2f (diff) |
[Zurich] Add report state to admin stats csv
-rw-r--r-- | perllib/FixMyStreet/Cobrand/Zurich.pm | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/perllib/FixMyStreet/Cobrand/Zurich.pm b/perllib/FixMyStreet/Cobrand/Zurich.pm index ffdc1feab..c74e41e10 100644 --- a/perllib/FixMyStreet/Cobrand/Zurich.pm +++ b/perllib/FixMyStreet/Cobrand/Zurich.pm @@ -592,10 +592,10 @@ sub admin_stats { ); if ( $c->req->params->{export} ) { - my $problems = $c->model('DB::Problem')->search( { %params }, { columns => [ 'id', 'created', 'latitude', 'longitude', 'cobrand', 'category' ] } ); - my $body = "ID,Created,E,N,Category\n"; + my $problems = $c->model('DB::Problem')->search( { %params }, { columns => [ 'id', 'created', 'latitude', 'longitude', 'cobrand', 'category', 'state' ] } ); + my $body = "ID,Created,E,N,Category,Status\n"; while (my $report = $problems->next) { - $body .= join( ',', $report->id, $report->created, $report->local_coords, $report->category ) . "\n"; + $body .= join( ',', $report->id, $report->created, $report->local_coords, $report->category, $report->state ) . "\n"; } $c->res->content_type('text/csv; charset=utf-8'); $c->res->body($body); |