tests: get current directory the perl way

instead of hoping to have it in the environment. This at
least broke tests on solaris.

Signed-off-by: Sven Nierlein <Sven.Nierlein@consol.de>
This commit is contained in:
Sven Nierlein 2014-07-31 13:31:11 +02:00
parent 18a9562dae
commit 559d11b1fb

View file

@ -6,6 +6,7 @@
use strict;
use Test::More;
use Cwd;
use NPTest;
# 15 tests in the first part, 9 in timeout tests and 2 * 32 in the last loops
@ -13,7 +14,7 @@ plan tests => 88;
my $res;
my $PWD = $ENV{PWD};
my $PWD = getcwd();
$res = NPTest->testCmd( "./negate" );
is( $res->return_code, 3, "Not enough parameters");