[Reproducible-commits] [libextutils-depends-perl] 166/187: Rename test packages to 8.3 unique.
Maria Valentina Marin Rodrigues
akira-guest at moszumanska.debian.org
Wed Jan 21 21:17:00 UTC 2015
This is an automated email from the git hooks/post-receive script.
akira-guest pushed a commit to branch pu/reproducible_builds
in repository libextutils-depends-perl.
commit 517d1ec41bf9238d24b15d9c671f6648a034e80b
Author: Ed J <mohawk2 at users.noreply.github.com>
Date: Mon Aug 11 18:41:32 2014 +0100
Rename test packages to 8.3 unique.
---
t/02_save_load.t | 14 +++++++-------
1 file changed, 7 insertions(+), 7 deletions(-)
diff --git a/t/02_save_load.t b/t/02_save_load.t
index 7118d70..eaf1f72 100644
--- a/t/02_save_load.t
+++ b/t/02_save_load.t
@@ -123,11 +123,11 @@ is_deeply ([ DepTest::Install::Files->deps ], [], 'api check deps method');
# --------------------------------------------------------------------------- #
my $INC_FRAG = '-Ddistinctive';
-make_test_pkg('PkgStorenew', <<EOF);
+make_test_pkg('PSnew', <<EOF);
sub Inline { +{ INC => '$INC_FRAG' } }
-sub deps { qw(PkgStoreold) }
+sub deps { qw(PSold) }
EOF
-make_test_pkg('PkgStoreold', "\@deps = qw(PkgStorenew); \$inc = '$INC_FRAG';");
+make_test_pkg('PSold', "\@deps = qw(PSnew); \$inc = '$INC_FRAG';");
sub make_test_pkg {
my ($base, $text) = @_;
my $dir = catdir($tmp_inc, $base, qw(Install));
@@ -139,14 +139,14 @@ sub make_test_pkg {
}
sub test_load {
my ($info, $msg) = @_;
- my $install_part = qr|PkgStore.*Install|;
+ my $install_part = qr|PS.*Install|;
like ($info->{inc}, $install_part, "$msg inc generic");
like ($info->{inc}, qr/$INC_FRAG/, "$msg inc specific");
- ok (scalar(grep { /PkgStore/ } @{$info->{deps}}), $msg);
+ ok (scalar(grep { /PS/ } @{$info->{deps}}), $msg);
ok (exists $info->{libs}, $msg);
}
-test_load (ExtUtils::Depends::load('PkgStorenew'), 'load new scheme');
-test_load (ExtUtils::Depends::load('PkgStoreold'), 'load old scheme');
+test_load (ExtUtils::Depends::load('PSnew'), 'load new scheme');
+test_load (ExtUtils::Depends::load('PSold'), 'load old scheme');
# --------------------------------------------------------------------------- #
--
Alioth's /usr/local/bin/git-commit-notice on /srv/git.debian.org/git/reproducible/libextutils-depends-perl.git
More information about the Reproducible-commits
mailing list