diff options
| author | Matthew Somerville <matthew@mysociety.org> | 2016-01-06 15:56:34 +0000 |
|---|---|---|
| committer | Matthew Somerville <matthew@mysociety.org> | 2016-01-06 17:09:07 +0000 |
| commit | 98c4305003a7fdd468822cd45a605dd935943f72 (patch) | |
| tree | b0388c94393eeb1ff1744504ca09fab9c9247a2c /perllib/FixMyStreet/DB | |
| parent | c46b06e6376e4e522604d3dbee94e215dca4955c (diff) | |
[fixmystreet.com] Don't show app step if used app.
Fixes #1305.
Diffstat (limited to 'perllib/FixMyStreet/DB')
| -rw-r--r-- | perllib/FixMyStreet/DB/Result/Problem.pm | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/perllib/FixMyStreet/DB/Result/Problem.pm b/perllib/FixMyStreet/DB/Result/Problem.pm index 449bb5be8..237785820 100644 --- a/perllib/FixMyStreet/DB/Result/Problem.pm +++ b/perllib/FixMyStreet/DB/Result/Problem.pm @@ -363,7 +363,8 @@ around lastupdate => $stz; around service => sub { my ( $orig, $self ) = ( shift, shift ); - my $s = $self->$orig(@_); + # service might be undef if e.g. unsaved code report + my $s = $self->$orig(@_) || ""; $s =~ s/_/ /g; return $s; }; |