diff options
author | Matthew Somerville <matthew@mysociety.org> | 2012-05-18 15:38:32 +0100 |
---|---|---|
committer | Matthew Somerville <matthew@mysociety.org> | 2012-05-18 15:38:32 +0100 |
commit | cab708bbb2e93034ba6a4dd4476a10ffecec481e (patch) | |
tree | da78964837b320cd536847774faeab8f4f979553 | |
parent | 617ac1389fb985568c7a94df83c9f8d7ebcbe61a (diff) |
Stop warning by checking existence first.
-rw-r--r-- | perllib/FixMyStreet/DB/Result/Problem.pm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/perllib/FixMyStreet/DB/Result/Problem.pm b/perllib/FixMyStreet/DB/Result/Problem.pm index 192e539bd..532c209d8 100644 --- a/perllib/FixMyStreet/DB/Result/Problem.pm +++ b/perllib/FixMyStreet/DB/Result/Problem.pm @@ -578,7 +578,7 @@ sub body { # Note: this only makes sense when called on a problem that has been sent! sub can_display_external_id { my $self = shift; - if ($self->external_id && $self->send_method_used eq 'barnet') { + if ($self->external_id && $self->send_method_used && $self->send_method_used eq 'barnet') { return 1; } return 0; |