[carton] 111/472: Ignore perl from showdeps

[Lucas Kanashiro]

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

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

commit 0bf8f566b57f5f3483b3a4a99461e67502db693b
Author: Tatsuhiko Miyagawa <miyagawa at bulknews.net>
Date:   Thu Oct 13 14:08:38 2011 +0900

    Ignore perl from showdeps
---
 lib/Carton.pm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/lib/Carton.pm b/lib/Carton.pm
index b280f3b..9419558 100644
--- a/lib/Carton.pm
+++ b/lib/Carton.pm
@@ -50,7 +50,7 @@ sub install_from_build_file {
 sub list_dependencies {
     my $self = shift;
 
-    my @deps = $self->run_cpanm_output("--showdeps", ".");
+    my @deps = grep !/^perl~/, $self->run_cpanm_output("--showdeps", ".");
     for my $line (@deps) {
         chomp $line;
     }

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