diff options
| author | franck cuny <franck@lumberjaph.net> | 2010-07-16 16:12:32 +0200 |
|---|---|---|
| committer | franck cuny <franck@lumberjaph.net> | 2010-07-16 16:12:32 +0200 |
| commit | 5fdee9e79b5b6a72522bee59e4bd7c62506a43c7 (patch) | |
| tree | 9e9f16e674310d95f7c39cea92e87aaa57d67746 /lib/MooseX/Net/API/Role/UserAgent.pm | |
| parent | another fix for path (diff) | |
| download | moosex-net-api-5fdee9e79b5b6a72522bee59e4bd7c62506a43c7.tar.gz | |
remove tests and old lib; use base net::http::api; DEPRECATED
Diffstat (limited to 'lib/MooseX/Net/API/Role/UserAgent.pm')
| -rw-r--r-- | lib/MooseX/Net/API/Role/UserAgent.pm | 36 |
1 files changed, 0 insertions, 36 deletions
diff --git a/lib/MooseX/Net/API/Role/UserAgent.pm b/lib/MooseX/Net/API/Role/UserAgent.pm deleted file mode 100644 index 3cb9714..0000000 --- a/lib/MooseX/Net/API/Role/UserAgent.pm +++ /dev/null @@ -1,36 +0,0 @@ -package MooseX::Net::API::Role::UserAgent; - -# ABSTRACT: create UserAgent - -use Moose::Role; -use LWP::UserAgent; - -has api_useragent => ( - is => 'rw', - isa => 'LWP::UserAgent', - lazy => 1, - default => sub { - my $self = shift; - my $ua = $self->meta->get_api_option('useragent'); - return $ua->() if $ua; - $ua = LWP::UserAgent->new(); - $ua->agent( - "MooseX::Net::API " . $MooseX::Net::API::VERSION . " (Perl)"); - $ua->env_proxy; - return $ua; - } -); - -1; - -=head1 SYNOPSIS - -=head1 DESCRIPTION - -=head2 ATTRIBUTES - -=over 4 - -=item B<api_useragent> - -=back |