diff options
author | Matthew Somerville <matthew@mysociety.org> | 2012-05-14 15:59:33 +0100 |
---|---|---|
committer | Matthew Somerville <matthew@mysociety.org> | 2012-05-14 15:59:33 +0100 |
commit | be802c7a8f1e7c7dc134281b76680f3a7d592441 (patch) | |
tree | 1a3721af4b9d60eb14e3fac17c4434b389a4a31e | |
parent | f644dac99016995a81a9e5cd9f9b3ed4fe2fd60b (diff) |
Log content type if it's bad.
-rw-r--r-- | perllib/FixMyStreet/App/Controller/Report/New.pm | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/perllib/FixMyStreet/App/Controller/Report/New.pm b/perllib/FixMyStreet/App/Controller/Report/New.pm index ca2dfc6b5..e7468986b 100644 --- a/perllib/FixMyStreet/App/Controller/Report/New.pm +++ b/perllib/FixMyStreet/App/Controller/Report/New.pm @@ -856,6 +856,7 @@ sub process_photo_upload : Private { # check that the photo is a jpeg my $ct = $upload->type; unless ( $ct eq 'image/jpeg' || $ct eq 'image/pjpeg' ) { + $c->log->info('Bad photo tried to upload, type=' . $ct); $c->stash->{photo_error} = _('Please upload a JPEG image only'); return; } |