aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorMatthew Somerville <matthew@mysociety.org>2011-09-15 17:00:10 +0100
committerMatthew Somerville <matthew@mysociety.org>2011-09-15 17:00:10 +0100
commitdf3b650e9d9829ba4093a8b637c1c670c982884f (patch)
treeb844cbc4d9ce6b44ac964431e34c6968749a6d82
parentcca853672d391dcf78e76f91c860b8d21c14dbd6 (diff)
Don't fail if the result is empty.
-rw-r--r--perllib/FixMyStreet/DB/ResultSet/Problem.pm2
1 files changed, 1 insertions, 1 deletions
diff --git a/perllib/FixMyStreet/DB/ResultSet/Problem.pm b/perllib/FixMyStreet/DB/ResultSet/Problem.pm
index 44c066454..59227fce8 100644
--- a/perllib/FixMyStreet/DB/ResultSet/Problem.pm
+++ b/perllib/FixMyStreet/DB/ResultSet/Problem.pm
@@ -66,7 +66,7 @@ sub recent {
my $result = Memcached::get($key);
if ( $result ) {
# Need to reattach schema so that confirmed column gets reinflated.
- $result->[0]->result_source->schema( $rs->result_source->schema );
+ $result->[0]->result_source->schema( $rs->result_source->schema ) if $result->[0];
} else {
$result = [ $rs->search( {
state => [ FixMyStreet::DB::Result::Problem->visible_states() ]