aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorChris Mytton <self@hecticjeff.net>2013-09-06 16:33:03 +0100
committerChris Mytton <self@hecticjeff.net>2013-09-09 15:41:05 +0100
commitfd57174663e65d10fcb968d9ebd570ad119a80ad (patch)
tree0bd024c0d22c19866ded18791fb0dae72fddbadb
parent3704a07ef4a94a7e20d01f9b5a9cdb8fcc449e89 (diff)
[Zurich] Add report user id to admin stats csv
-rw-r--r--perllib/FixMyStreet/Cobrand/Zurich.pm6
1 files changed, 3 insertions, 3 deletions
diff --git a/perllib/FixMyStreet/Cobrand/Zurich.pm b/perllib/FixMyStreet/Cobrand/Zurich.pm
index c74e41e10..cd42bdf02 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', 'state' ] } );
- my $body = "ID,Created,E,N,Category,Status\n";
+ my $problems = $c->model('DB::Problem')->search( { %params }, { columns => [ 'id', 'created', 'latitude', 'longitude', 'cobrand', 'category', 'state', 'user_id' ] } );
+ my $body = "ID,Created,E,N,Category,Status,UserID\n";
while (my $report = $problems->next) {
- $body .= join( ',', $report->id, $report->created, $report->local_coords, $report->category, $report->state ) . "\n";
+ $body .= join( ',', $report->id, $report->created, $report->local_coords, $report->category, $report->state, $report->user_id ) . "\n";
}
$c->res->content_type('text/csv; charset=utf-8');
$c->res->body($body);