diff options
Diffstat (limited to 'perllib/Open311.pm')
| -rw-r--r-- | perllib/Open311.pm | 12 |
1 files changed, 8 insertions, 4 deletions
diff --git a/perllib/Open311.pm b/perllib/Open311.pm index 1027c756f..ef430d628 100644 --- a/perllib/Open311.pm +++ b/perllib/Open311.pm @@ -78,9 +78,11 @@ sub send_service_request { } } - warn sprintf( "Failed to submit problem %s over Open311, response\n: %s\n%s", $problem->id, $response, $self->debug_details ); + warn sprintf( "Failed to submit problem %s over Open311, response\n: %s\n%s", $problem->id, $response, $self->debug_details ) + unless $problem->send_fail_count; } else { - warn sprintf( "Failed to submit problem %s over Open311, details:\n%s", $problem->id, $self->error); + warn sprintf( "Failed to submit problem %s over Open311, details:\n%s", $problem->id, $self->error) + unless $problem->send_fail_count; } return 0; } @@ -264,9 +266,11 @@ sub post_service_request_update { } } - warn sprintf( "Failed to submit comment %s over Open311, response - %s\n%s\n", $comment->id, $response, $self->debug_details ); + warn sprintf( "Failed to submit comment %s over Open311, response - %s\n%s\n", $comment->id, $response, $self->debug_details ) + unless $comment->send_fail_count; } else { - warn sprintf( "Failed to submit comment %s over Open311, details\n%s\n", $comment->id, $self->error); + warn sprintf( "Failed to submit comment %s over Open311, details\n%s\n", $comment->id, $self->error) + unless $comment->send_fail_count; } return 0; } |