r1399@llin: dpavlin | 2007-10-31 11:19:39 +0100
[webpac2] / t / 1-validate.t
index 8b62d47..bbbc3e9 100755 (executable)
@@ -23,7 +23,7 @@ ok(my $v = new WebPAC::Validate(
 
 ok( ! $v->{rules}, 'no path' );
 
-ok(my $v = new WebPAC::Validate(
+ok($v = new WebPAC::Validate(
        path => "$abs_path/data/validate_test",
        debug => $debug,
 ), "new with path");