From 78fcbf54a4305e1ee6c3a105f91af40c7ea0a62a Mon Sep 17 00:00:00 2001 From: franck cuny Date: Tue, 8 Jun 2010 15:22:36 +0200 Subject: switch to MX::Declare; rename some roles and dispatcher --- lib/Net/HTTP/Console/Role/APILib.pm | 26 -------------------------- 1 file changed, 26 deletions(-) delete mode 100644 lib/Net/HTTP/Console/Role/APILib.pm (limited to 'lib/Net/HTTP/Console/Role/APILib.pm') diff --git a/lib/Net/HTTP/Console/Role/APILib.pm b/lib/Net/HTTP/Console/Role/APILib.pm deleted file mode 100644 index 5f5aff1..0000000 --- a/lib/Net/HTTP/Console/Role/APILib.pm +++ /dev/null @@ -1,26 +0,0 @@ -package Net::HTTP::Console::Role::APILib; - -use Moose::Role; - -has lib => (isa => 'Str', is => 'rw', default => 'Net::HTTP::Console::Dummy'); -has api_object => ( - isa => 'Object', - is => 'rw', - lazy => 1, - default => sub { - my $self = shift; - $self->load_api_lib($self->lib); - }, -); - -sub load_api_lib { - my ($self, $lib) = @_; - Class::MOP::load_class($lib); - my $o = $lib->new(); - $o->api_base_url($self->url) if $self->has_url; - $o->api_format($self->format) if $self->has_format; - $o->api_format_mode($self->format_mode) if $self->has_format_mode; - $o; -} - -1; -- cgit v1.2.3