This is an automated email from the git hooks/post-receive script. kanashiro-guest pushed a commit to branch master in repository carton.
commit 6ce6487ee5e8e24235c9c7de1c7785c545701484 Author: Tatsuhiko Miyagawa <[email protected]> Date: Wed Jun 29 23:37:05 2011 -0400 Added unit tests for uninstalling dependencies --- xt/cli/uninstall_dep.t | 40 ++++++++++++++++++++++++++++++++++++++++ 1 file changed, 40 insertions(+) diff --git a/xt/cli/uninstall_dep.t b/xt/cli/uninstall_dep.t new file mode 100644 index 0000000..a058cba --- /dev/null +++ b/xt/cli/uninstall_dep.t @@ -0,0 +1,40 @@ +use strict; +use Test::More; +use xt::CLI; +use Cwd; + +my $cwd = Cwd::cwd(); + +{ + my $app = cli(); + + $app->dir->touch("Makefile.PL", <<EOF); +use ExtUtils::MakeMaker; +WriteMakefile( + NAME => 'foo', + VERSION => '0.1', + PREREQ_PM => { + CGI => 3.50, + FCGI => 0.72, + }, +); +EOF + + $app->run("install"); + $app->run("uninstall", "CGI"); + + like $app->output, qr/Uninstalling CGI/; + unlike $app->output, qr/Uninstalling FCGI/; + + $app->run("list"); + unlike $app->output, qr/^CGI-/m; + like $app->output, qr/FCGI-/; + + $app->run("uninstall", "FCGI"); + like $app->output, qr/Uninstalling FCGI/; +} + +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 [email protected] http://lists.alioth.debian.org/cgi-bin/mailman/listinfo/pkg-perl-cvs-commits
