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

kanashiro-guest pushed a commit to branch master
in repository carton.

commit a33467ef2b211c0614889e176023d0ecec612a1d
Author: Tatsuhiko Miyagawa <miyag...@bulknews.net>
Date:   Sat Jun 1 17:16:09 2013 +0900

    remove unused code
---
 lib/Carton.pm | 13 -------------
 1 file changed, 13 deletions(-)

diff --git a/lib/Carton.pm b/lib/Carton.pm
index e1cab27..31154d6 100644
--- a/lib/Carton.pm
+++ b/lib/Carton.pm
@@ -80,19 +80,6 @@ sub install {
     ) or die "Installing modules failed\n";
 }
 
-sub is_core {
-    my($self, $module, $want_ver, $perl_version) = @_;
-    $perl_version ||= $];
-
-    require Module::CoreList;
-    my $is_core  = exists $Module::CoreList::version{$perl_version + 
0}{$module}
-        or return;
-
-    my $core_ver = $Module::CoreList::version{$perl_version + 0}{$module};
-    return 1 unless $want_ver;
-    return version->new($core_ver) >= version->new($want_ver);
-};
-
 sub run_cpanm {
     my($self, @args) = @_;
     local $ENV{PERL_CPANM_OPT};

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

_______________________________________________
Pkg-perl-cvs-commits mailing list
Pkg-perl-cvs-commits@lists.alioth.debian.org
http://lists.alioth.debian.org/cgi-bin/mailman/listinfo/pkg-perl-cvs-commits

Reply via email to