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

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

commit 4485e094d10386d87db626d047e1874fba8021cd
Author: Tatsuhiko Miyagawa <miyag...@bulknews.net>
Date:   Thu Jun 6 10:33:02 2013 +0900

    added a TODO test to detect unused modules in local
---
 xt/cli/check.t | 19 +++++++++++++++++++
 1 file changed, 19 insertions(+)

diff --git a/xt/cli/check.t b/xt/cli/check.t
index 1648647..6fa9e7c 100644
--- a/xt/cli/check.t
+++ b/xt/cli/check.t
@@ -61,5 +61,24 @@ EOF
     like $app->stdout, qr/not satisfied/;
 };
 
+subtest 'detect unused modules' => sub {
+    my $app = cli;
+    $app->write_cpanfile("requires 'Try::Tiny';");
+
+    $app->run("install");
+    $app->write_cpanfile("");
+
+
+ TODO: {
+        local $TODO = "Can't detect superflous modules";
+        $app->run("install");
+        $app->run("list");
+        is $app->stdout, "";
+
+        $app->run("check");
+        like $app->stdout, qr/unused/;
+    }
+};
+
 done_testing;
 

-- 
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