diff options
| -rw-r--r-- | perllib/Open311.pm | 2 | ||||
| -rw-r--r-- | t/open311.t | 2 |
2 files changed, 2 insertions, 2 deletions
diff --git a/perllib/Open311.pm b/perllib/Open311.pm index 1dcdaaee3..50c7abb54 100644 --- a/perllib/Open311.pm +++ b/perllib/Open311.pm @@ -193,7 +193,7 @@ sub post_service_request_update { } } - warn sprintf( "Failed to submit comment %s over Open311, response\n: %s\n%s", $comment->id, $response, $self->debug_details ); + warn sprintf( "Failed to submit comment %s over Open311, response - %s\n%s", $comment->id, $response, $self->debug_details ); return 0; } } diff --git a/t/open311.t b/t/open311.t index 99a1346d1..2a9d513eb 100644 --- a/t/open311.t +++ b/t/open311.t @@ -156,7 +156,7 @@ subtest 'error reponse' => sub { my $results; warning_like { $results = make_update_req( $comment, '<?xml version="1.0" encoding="utf-8"?><errors><error><code>400</code><description>There was an error</description</error></errors>' ) - } qr/There was an error/, 'correct error message'; + } qr/Failed to submit comment \d+ over Open311.*There was an error/, 'correct error messages'; is $results->{ res }, 0, 'error in response is a failure'; }; |