summaryrefslogtreecommitdiff
path: root/lib/MooseX/Net/API/Error.pm
diff options
context:
space:
mode:
Diffstat (limited to 'lib/MooseX/Net/API/Error.pm')
-rw-r--r--lib/MooseX/Net/API/Error.pm36
1 files changed, 33 insertions, 3 deletions
diff --git a/lib/MooseX/Net/API/Error.pm b/lib/MooseX/Net/API/Error.pm
index 0542613..8825877 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',
@@ -29,5 +29,35 @@ 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