diff options
Diffstat (limited to 'lib/Net/HTTP')
| -rw-r--r-- | lib/Net/HTTP/Spore/Middleware/Format.pm | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/lib/Net/HTTP/Spore/Middleware/Format.pm b/lib/Net/HTTP/Spore/Middleware/Format.pm index 2741295..1fd5ce5 100644 --- a/lib/Net/HTTP/Spore/Middleware/Format.pm +++ b/lib/Net/HTTP/Spore/Middleware/Format.pm @@ -54,8 +54,9 @@ sub call { sub { my $res = shift; if ( $res->body ) { - my $content = $self->decode( $res->body ); + return if $res->code >= 500; return unless $self->should_deserialize( $res->env ); + my $content = $self->decode( $res->body ); $res->body($content); $res->env->{ $self->deserializer_key } = 1; } |