[carton] 63/472: Fixed the plain list to use self->print

[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 de3438624364bae6813cf95f21c36183d9eef719
Author: Tatsuhiko Miyagawa <miyagawa at bulknews.net>
Date:   Mon Jun 27 14:52:55 2011 -0400

    Fixed the plain list to use self->print
---
 TODO              | 23 -----------------------
 lib/Carton/CLI.pm |  2 +-
 xt/cli/check.t    |  5 ++++-
 3 files changed, 5 insertions(+), 25 deletions(-)

diff --git a/TODO b/TODO
deleted file mode 100644
index 9df5410..0000000
--- a/TODO
+++ /dev/null
@@ -1,23 +0,0 @@
-# 1.0
-Fix non-intuitive errors when Makefile.PL is not valid (in showdeps)
-carton config / .carton/config
-carton update
-clean uninstall?
--g, --global + local::lib (~/perl5)
-exec
-
-# 1.1
-unit tests
-carton bundle
-self-contained cpanm and carton
-support lowest possible perl version (to change CoreList in cpanm dict)
-
-# 1.2
-Support DarkPAN/github etc
-dzil support
-
-# 1.3
-perlrocks multiple versions
-
-# 1.4
-At some point I have to stop patching cpanm to add more options/commands and re-implement its guts inside Carton
\ No newline at end of file
diff --git a/lib/Carton/CLI.pm b/lib/Carton/CLI.pm
index 1e554df..c5f3ece 100644
--- a/lib/Carton/CLI.pm
+++ b/lib/Carton/CLI.pm
@@ -184,7 +184,7 @@ sub cmd_show {
         });
     } else {
         for my $module (values %{$lock->{modules} || {}}) {
-            printf "$module->{dist}\n";
+            $self->print("$module->{dist}\n");
         }
     }
 }
diff --git a/xt/cli/check.t b/xt/cli/check.t
index 59cdd21..171a970 100644
--- a/xt/cli/check.t
+++ b/xt/cli/check.t
@@ -21,9 +21,12 @@ EOF
     unlike $app->output, qr/found in local but/;
 
     $app->run("install");
-    $app->run("check");
 
+    $app->run("check");
     like $app->output, qr/matches/;
+
+    $app->run("list");
+    like $app->output, qr/Try-Tiny-/;
 }
 
 

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