[libhttp-throwable-perl] 04/11: do not import non-method

Jonas Smedegaard js at alioth.debian.org
Mon Sep 30 08:15:47 UTC 2013


This is an automated email from the git hooks/post-receive script.

js pushed a commit to branch master
in repository libhttp-throwable-perl.

commit 56d36ef30e5eecbd8d3a1d39b0f79fa86544d7d8
Author: Ricardo Signes <rjbs at cpan.org>
Date:   Tue Sep 17 09:00:21 2013 +0900

    do not import non-method
---
 lib/HTTP/Throwable/Factory.pm |    4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/lib/HTTP/Throwable/Factory.pm b/lib/HTTP/Throwable/Factory.pm
index 0e2cef5..02bdf41 100644
--- a/lib/HTTP/Throwable/Factory.pm
+++ b/lib/HTTP/Throwable/Factory.pm
@@ -8,7 +8,7 @@ use Sub::Exporter -setup => {
     http_exception => Sub::Exporter::Util::curry_method('new_exception'),
   ],
 };
-use Module::Runtime qw(use_module);
+use Module::Runtime;
 
 sub throw {
     my $factory = shift;
@@ -65,7 +65,7 @@ sub class_for {
         @roles = $self->roles_for_no_ident;
     }
 
-    use_module($_) for @roles;
+    Module::Runtime::use_module($_) for @roles;
 
     my $class = Moose::Meta::Class->create_anon_class(
         superclasses => [ $self->base_class ],

-- 
Alioth's /usr/local/bin/git-commit-notice on /srv/git.debian.org/git/pkg-perl/packages/libhttp-throwable-perl.git



More information about the Pkg-perl-cvs-commits mailing list