From f71c0242734c134ad7b9588f438f5e7d15038720 Mon Sep 17 00:00:00 2001 From: Matthew Somerville Date: Wed, 20 Apr 2016 19:31:06 +0100 Subject: Ignore empty entries in the image upload IDs. --- perllib/FixMyStreet/App/Controller/Photo.pm | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/perllib/FixMyStreet/App/Controller/Photo.pm b/perllib/FixMyStreet/App/Controller/Photo.pm index 59f54bad7..d24d3ff71 100644 --- a/perllib/FixMyStreet/App/Controller/Photo.pm +++ b/perllib/FixMyStreet/App/Controller/Photo.pm @@ -140,7 +140,7 @@ sub process_photo_upload_or_cache : Private { /^photo/ ? # photo, photo1, photo2 etc. ($c->req->upload($_)) : () } sort $c->req->upload), - split /,/, ($c->get_param('upload_fileid') || '') + grep { $_ } split /,/, ($c->get_param('upload_fileid') || '') ); my $photoset = FixMyStreet::App::Model::PhotoSet->new({ -- cgit v1.2.3