Changeset 2275 in ProjectBuilder for devel/pb-modules/t/Base.t

Timestamp:

Aug 30, 2017, 5:07:58 PM (7 years ago)

Author:

Bruno Cornec

Message:

Fix tests so that they really work when Test::More isn't found

File:

• devel/pb-modules/t/Base.t (modified) (2 diffs)

devel/pb-modules/t/Base.t

@@ -6 +6 @@
 use ProjectBuilder::Base;
 
+my $res;
 eval
 {
     require Test::More;
     Test::More->import();
+    $res = $@;
     my ($tmv,$tmsv) = split(/\./,$Test::More::VERSION);
     if ($tmsv lt 87) {
@@ -17 +19 @@
 
 # Test::More appropriate version not found so no test will be performed here
-if ($@) {
+if ($res) {
     require Test;
     Test->import();