[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