diff --git a/NPTest.pm b/NPTest.pm
index 1cd89db75b425ddfdaf3076f240cf828065f3f72..54a535e77808b167741ba30ca744fcb3266acc5c 100644 (file)
--- a/NPTest.pm
+++ b/NPTest.pm
chomp $output;
$object->output($output);
+ my ($pkg, $file, $line) = caller(0);
+ print "Testing: $command", $/;
if ($ENV{'NPTEST_DEBUG'}) {
- my ($pkg, $file, $line) = caller(0);
print "testCmd: Called from line $line in $file", $/;
- print "Testing: $command", $/;
print "Output: ", $object->output, $/;
print "Return code: ", $object->return_code, $/;
}