[carton] 293/472: rename is_perl to is_core
Lucas Kanashiro
kanashiro-guest at moszumanska.debian.org
Fri Jul 24 00:38:56 UTC 2015
This is an automated email from the git hooks/post-receive script.
kanashiro-guest pushed a commit to branch master
in repository carton.
commit 5349f7d49a4237573ae2e73539565b75c90e97f7
Author: Tatsuhiko Miyagawa <miyagawa at bulknews.net>
Date: Wed Jun 5 18:47:03 2013 +0900
rename is_perl to is_core
---
lib/Carton/CLI.pm | 2 +-
lib/Carton/Dist.pm | 2 +-
lib/Carton/Dist/Core.pm | 2 +-
3 files changed, 3 insertions(+), 3 deletions(-)
diff --git a/lib/Carton/CLI.pm b/lib/Carton/CLI.pm
index 393c4ce..cf3d147 100644
--- a/lib/Carton/CLI.pm
+++ b/lib/Carton/CLI.pm
@@ -264,7 +264,7 @@ sub cmd_tree {
my %seen;
my $dumper = sub {
my($dependency, $level) = @_;
- return if $dependency->dist->is_perl;
+ return if $dependency->dist->is_core;
return if $seen{$dependency->distname}++;
$self->printf( "%s%s (%s)\n", " " x ($level - 1), $dependency->module, $dependency->distname, INFO );
};
diff --git a/lib/Carton/Dist.pm b/lib/Carton/Dist.pm
index fd6e663..dbadd5f 100644
--- a/lib/Carton/Dist.pm
+++ b/lib/Carton/Dist.pm
@@ -11,7 +11,7 @@ has target => (is => 'ro');
has dist => (is => 'ro');
has mymeta => (is => 'ro', coerce => sub { CPAN::Meta->new($_[0], { lazy_validation => 1 }) });
-sub is_perl { 0 }
+sub is_core { 0 }
sub distfile {
my $self = shift;
diff --git a/lib/Carton/Dist/Core.pm b/lib/Carton/Dist/Core.pm
index 4c9b328..d5d4027 100644
--- a/lib/Carton/Dist/Core.pm
+++ b/lib/Carton/Dist/Core.pm
@@ -11,7 +11,7 @@ sub BUILDARGS {
\%args;
}
-sub is_perl { 1 }
+sub is_core { 1 }
sub prereqs {
my $self = shift;
--
Alioth's /usr/local/bin/git-commit-notice on /srv/git.debian.org/git/pkg-perl/packages/carton.git
More information about the Pkg-perl-cvs-commits
mailing list