[carton] 167/472: Fix multi mirror test to use cpanfile
Lucas Kanashiro
kanashiro-guest at moszumanska.debian.org
Fri Jul 24 00:38:44 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 9602679b3866253a012df83b21b2d71cebace8ce
Author: Tatsuhiko Miyagawa <miyagawa at bulknews.net>
Date: Sat May 12 06:10:43 2012 +0300
Fix multi mirror test to use cpanfile
---
xt/cli/mirror_multi.t | 11 ++++++++---
1 file changed, 8 insertions(+), 3 deletions(-)
diff --git a/xt/cli/mirror_multi.t b/xt/cli/mirror_multi.t
index 36a0df4..6706d5b 100644
--- a/xt/cli/mirror_multi.t
+++ b/xt/cli/mirror_multi.t
@@ -8,9 +8,12 @@ my $cwd = Cwd::cwd();
{
# split string
my $app = cli();
+ $app->dir->touch("cpanfile", <<EOF);
+requires 'PSGI';
+EOF
$app->carton->{mirror} = "$cwd/xt/mirror,http://cpan.metacpan.org/";
- $app->run("install", "PSGI");
+ $app->run("install");
$app->run("list");
like $app->output, qr/^PSGI-/;
@@ -19,10 +22,12 @@ my $cwd = Cwd::cwd();
{
# ARRAY ref
my $app = cli();
+ $app->dir->touch("cpanfile", <<EOF);
+requires 'PSGI';
+EOF
$app->carton->{mirror} = ["$cwd/xt/mirror", "http://cpan.metacpan.org/"];
- $app->run("install", "PSGI");
-
+ $app->run("install");
$app->run("list");
like $app->output, qr/^PSGI-/;
}
--
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