[libconfig-model-dpkg-perl] 03/07: test: always use list context with check_versioned_dep

dod at debian.org dod at debian.org
Mon Aug 21 17:54:31 UTC 2017


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

dod pushed a commit to branch master
in repository libconfig-model-dpkg-perl.

commit 5860c9eb27dae8f4ffbfb256188f1107dc1a268e
Author: Dominique Dumont <dod at debian.org>
Date:   Fri Aug 18 19:35:42 2017 +0200

    test: always use list context with check_versioned_dep
---
 t/dependency-check.t | 6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

diff --git a/t/dependency-check.t b/t/dependency-check.t
index 9d4feeb..d688fdf 100644
--- a/t/dependency-check.t
+++ b/t/dependency-check.t
@@ -200,8 +200,8 @@ warning_like {
  [ qr/unnecessary/ ] ,
   "test warn on perl dep with old version";
 
-my $res = $dep_value->check_versioned_dep( {name => 'perl', dep => ['>=','5.6.0']} );
-is( $res, 0,"check perl (>= 5.6.0) dependency: no older version");
+my ($res) = $dep_value->check_versioned_dep( {name => 'perl', dep => ['>=','5.6.0']} );
+is( $res, 0, "check perl (>= 5.6.0) dependency: no older version");
 
 
 # $dep_value->store('libcpan-meta-perl') ;
@@ -283,7 +283,7 @@ is($perl_dep->fetch,"perl (>= 5.10.1)","check dependency value from config tree"
 my $res = $perl_dep->check_versioned_dep({name => 'perl', dep => ['>=','5.28.1']}) ;
 is($res,1,"check perl (>= 5.28.1) dependency: has older version");
 
-$res = $perl_dep->check_versioned_dep({ name =>'perl', dep =>['>=','5.6.0']}) ;
+($res) = $perl_dep->check_versioned_dep({ name =>'perl', dep =>['>=','5.6.0']}) ;
 is($res,0,"check perl (>= 5.6.0) dependency: no older version");
 
 my $dpkg_dep = $control->grab("source Build-Depends:2");

-- 
Alioth's /usr/local/bin/git-commit-notice on /srv/git.debian.org/git/pkg-perl/packages/libconfig-model-dpkg-perl.git



More information about the Pkg-perl-cvs-commits mailing list