diff options
Diffstat (limited to 'lib/WWW/Pocket.pm')
-rw-r--r-- | lib/WWW/Pocket.pm | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/lib/WWW/Pocket.pm b/lib/WWW/Pocket.pm index 645f30c..6567a94 100644 --- a/lib/WWW/Pocket.pm +++ b/lib/WWW/Pocket.pm @@ -3,7 +3,9 @@ use Moose; # ABSTRACT: Wrapper for the Pocket v3 API use HTTP::Tiny; +use IO::Socket::SSL; # Necessary for https URLs on HTTP::Tiny. use JSON::PP; +use Carp; =head1 SYNOPSIS @@ -263,7 +265,7 @@ sub _request { }, }, ); - die "Request for $uri failed ($response->{status}): $response->{reason}" + croak "Request for $uri failed ($response->{status}): $response->{content}" unless $response->{success}; return decode_json($response->{content}); |