From 255560845c1246e0bd4643e8eeddc02e72ff2ffe Mon Sep 17 00:00:00 2001 From: Mark Glines Date: Mon, 22 Apr 2002 02:52:33 +0000 Subject: tuned testing system slightly --- perl/test/helper.pm | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'perl/test/helper.pm') diff --git a/perl/test/helper.pm b/perl/test/helper.pm index 3d980ec..0be9ab8 100644 --- a/perl/test/helper.pm +++ b/perl/test/helper.pm @@ -17,7 +17,7 @@ if($0 !~ qr|s/u?mount\.t$|) { } } } - $reject = 0 if (system("ls $_point >&/dev/null") >> 8); + $reject = 1 if (system("ls $_point >&/dev/null") >> 8); die "not properly mounted\n" if $reject; } 1; -- cgit v1.2.3