[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