diff options
| author | franck cuny <franck@lumberjaph.net> | 2010-06-08 13:18:38 +0200 |
|---|---|---|
| committer | franck cuny <franck@lumberjaph.net> | 2010-06-08 13:18:38 +0200 |
| commit | 548f1a38f43a1b5da435b3a7c778f5ec3471f2f2 (patch) | |
| tree | 4b36535807ec253033bc6f4ba0f259e62c74d1f6 /lib/Net/HTTP/Console/Dispatcher/LoadLib.pm | |
| parent | update name of api methods; fetch doc from method (diff) | |
| download | net-http-console-548f1a38f43a1b5da435b3a7c778f5ec3471f2f2.tar.gz | |
update regex; modify http methods; ..
Diffstat (limited to 'lib/Net/HTTP/Console/Dispatcher/LoadLib.pm')
| -rw-r--r-- | lib/Net/HTTP/Console/Dispatcher/LoadLib.pm | 7 |
1 files changed, 1 insertions, 6 deletions
diff --git a/lib/Net/HTTP/Console/Dispatcher/LoadLib.pm b/lib/Net/HTTP/Console/Dispatcher/LoadLib.pm index 7aac18f..d5e97cc 100644 --- a/lib/Net/HTTP/Console/Dispatcher/LoadLib.pm +++ b/lib/Net/HTTP/Console/Dispatcher/LoadLib.pm @@ -7,12 +7,7 @@ with qw/Net::HTTP::Console::Dispatcher/; sub dispatch { my ($self, $input) = @_; - if (Class::MOP::load_class($input)) { - print "loaded ".$input."\n"; - $self->application->lib($input); - return 1; - } - # XXX error confess & co + $self->application->load_api_lib($input); } sub pattern { |