summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
-rw-r--r--NPTest.pm8
1 files changed, 4 insertions, 4 deletions
diff --git a/NPTest.pm b/NPTest.pm
index 8ea5af8..54a535e 100644
--- a/NPTest.pm
+++ b/NPTest.pm
@@ -18,7 +18,7 @@ use File::Basename;
18use IO::File; 18use IO::File;
19use Data::Dumper; 19use Data::Dumper;
20 20
21use Test::More; 21use Test;
22 22
23use vars qw($VERSION); 23use vars qw($VERSION);
24$VERSION = "1556."; # must be all one line, for MakeMaker 24$VERSION = "1556."; # must be all one line, for MakeMaker
@@ -628,9 +628,9 @@ sub testCmd {
628 my ($pkg, $file, $line) = caller(0); 628 my ($pkg, $file, $line) = caller(0);
629 print "Testing: $command", $/; 629 print "Testing: $command", $/;
630 if ($ENV{'NPTEST_DEBUG'}) { 630 if ($ENV{'NPTEST_DEBUG'}) {
631 diag("testCmd: Called from line $line in $file", $/); 631 print "testCmd: Called from line $line in $file", $/;
632 diag("Output: ", $object->output, $/); 632 print "Output: ", $object->output, $/;
633 diag("Return code: ", $object->return_code, $/); 633 print "Return code: ", $object->return_code, $/;
634 } 634 }
635 635
636 return $object; 636 return $object;