Permalink
Browse files

Added appropriate 'requires' to Moose Roles

  • Loading branch information...
1 parent ba8cfcf commit a5b1067f2bef2630e0310b1912b83e74178a8979 @semifor semifor committed Jun 17, 2009
@@ -1,6 +1,8 @@
package Net::Twitter::Role::API::REST;
-
use Moose::Role;
+
+requires qw/credentials/;
+
use Net::Twitter::API;
requires qw/ua username password credentials/;
@@ -1,5 +1,8 @@
package Net::Twitter::Role::API::TwitterVision;
use Moose::Role;
+
+requires qw/credentials/;
+
use Net::Twitter::API;
has tvurl => ( isa => 'Str', is => 'ro', default => 'http://twittervision.com' );
@@ -54,7 +57,7 @@ Net::Twitter::Role::API::TwitterVision - A definition of the TwitterVision API a
=head1 DESCRIPTION
-B<Net::Twitter::Role::API::TwitterVision provides definitions for all the TwitterVision API
+B<Net::Twitter::Role::API::TwitterVision> provides definitions for all the TwitterVision API
methods. Applying this role to any class provides methods for all of the
TwitterVision API methods.
@@ -1,6 +1,8 @@
package Net::Twitter::Role::OAuth;
use Moose::Role;
+requires qw/ua/;
+
use namespace::autoclean;
use Net::OAuth::Simple;
@@ -1,6 +1,8 @@
package Net::Twitter::Role::WrapError;
use Moose::Role;
+requires qw/_parse_result/;
+
use namespace::autoclean;
has _http_response => ( isa => 'HTTP::Response', is => 'rw',

0 comments on commit a5b1067

Please sign in to comment.