diff options
| author | Jesse Luehrs <doy@tozt.net> | 2016-05-29 00:51:36 -0400 |
|---|---|---|
| committer | Jesse Luehrs <doy@tozt.net> | 2016-05-29 00:51:36 -0400 |
| commit | bbc2887a8efdf6323d0b4bf3d8bde6d17e8b4565 (patch) | |
| tree | 1afd9fadc3c00154d001479105e17d0b7dc5a502 /lib/WWW/Pocket.pm | |
| parent | 73914c7b31b2cb1b6617544a9eda92cf8387e9f6 (diff) | |
| parent | e307a8443dede3013016167031720d53b527dd7a (diff) | |
| download | www-pocket-bbc2887a8efdf6323d0b4bf3d8bde6d17e8b4565.tar.gz www-pocket-bbc2887a8efdf6323d0b4bf3d8bde6d17e8b4565.zip | |
Merge pull request #1 from gaurav/develop
Improved usage
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}); |