diff options
Diffstat (limited to 'perllib/Problems.pm')
| -rw-r--r-- | perllib/Problems.pm | 5 |
1 files changed, 4 insertions, 1 deletions
diff --git a/perllib/Problems.pm b/perllib/Problems.pm index f34e4af9b..098572917 100644 --- a/perllib/Problems.pm +++ b/perllib/Problems.pm @@ -6,7 +6,7 @@ # Copyright (c) 2008 UK Citizens Online Democracy. All rights reserved. # Email: matthew@mysociety.org; WWW: http://www.mysociety.org/ # -# $Id: Problems.pm,v 1.15 2009-07-01 12:52:41 louise Exp $ +# $Id: Problems.pm,v 1.16 2009-07-01 13:02:07 louise Exp $ # package Problems; @@ -194,6 +194,9 @@ sub problems_matching_criteria{ if ($problem->{anonymous} == 1){ $problem->{name} = ''; } + if ($problem->{service} == ''){ + $problem->{service} = 'Web interface'; + } if ($problem->{council}) { $problem->{council} =~ s/\|.*//g; my @council_ids = split /,/, $problem->{council}; |