diff options
| author | Matthew Somerville <matthew-github@dracos.co.uk> | 2012-10-08 12:07:48 +0100 |
|---|---|---|
| committer | Matthew Somerville <matthew-github@dracos.co.uk> | 2012-10-08 12:08:12 +0100 |
| commit | 0a07e772c8c7682f0b8717bed5a8b7e321c25665 (patch) | |
| tree | faece325766abad544c846f31e21e5b6cbba89dd | |
| parent | 50629e0d0ee06ee49761e42f89fe6488ada1a751 (diff) | |
Display method variables correctly.
| -rw-r--r-- | .travis.yml | 5 | ||||
| -rw-r--r-- | perllib/FixMyStreet/DB/ResultSet/Problem.pm | 4 |
2 files changed, 8 insertions, 1 deletions
diff --git a/.travis.yml b/.travis.yml index dc371120d..6232140a4 100644 --- a/.travis.yml +++ b/.travis.yml @@ -1,5 +1,10 @@ notifications: email: false + irc: + channels: + - "irc.mysociety.org#fixmystreet" + use_notice: true + skip_join: true language: perl perl: diff --git a/perllib/FixMyStreet/DB/ResultSet/Problem.pm b/perllib/FixMyStreet/DB/ResultSet/Problem.pm index fa9baf1d9..bb826a5ca 100644 --- a/perllib/FixMyStreet/DB/ResultSet/Problem.pm +++ b/perllib/FixMyStreet/DB/ResultSet/Problem.pm @@ -430,7 +430,9 @@ sub send_reports { send_fail_count => { '>', 0 } } ); while (my $row = $unsent->next) { - $sending_errors .= "* http://www.fixmystreet.com/report/$row->id, failed $row->send_fail_count times, last at $row->send_fail_timestamp, reason $row->send_fail_reason\n" + $sending_errors .= "* http://www.fixmystreet.com/report/" . $row->id . ", failed " + . $row->send_fail_count . " times, last at " . $row->send_fail_timestamp + . ", reason " . $row->send_fail_reason . "\n"; } if ($sending_errors) { print "The following reports had problems sending:\n$sending_errors"; |