diff options
Diffstat (limited to 'lib')
| -rw-r--r-- | lib/MooseX/Net/API/Error.pm | 35 |
1 files changed, 33 insertions, 2 deletions
diff --git a/lib/MooseX/Net/API/Error.pm b/lib/MooseX/Net/API/Error.pm index 0542613..a710205 100644 --- a/lib/MooseX/Net/API/Error.pm +++ b/lib/MooseX/Net/API/Error.pm @@ -1,12 +1,12 @@ package MooseX::Net::API::Error; use Moose; -use JSON::XS; +use JSON; use Moose::Util::TypeConstraints; use overload '""' => \&error; subtype error => as 'Str'; -coerce error => from 'HashRef' => via { encode_json $_}; +coerce error => from 'HashRef' => via { JSON::encode_json $_}; has http_error => ( is => 'ro', @@ -31,3 +31,34 @@ sub error { 1; __END__ + +=head1 NAME + +MooseX::Net::API::Error + +=head1 SYNOPSIS + + MooseX::Net::API::Error->new(reason => "'useragent' is required"); + +or + + MooseX::Net::API::Error->new() + +=head1 DESCRIPTION + +=head1 AUTHOR + +franck cuny E<lt>franck@lumberjaph.netE<gt> + +=head1 SEE ALSO + +=head1 LICENSE + +Copyright 2009, 2010 by Linkfluence + +http://linkfluence.net + +This library is free software; you can redistribute it and/or modify +it under the same terms as Perl itself. + +=cut |