]> rtime.felk.cvut.cz Git - novaboot.git/commitdiff
Fix test
authorMichal Sojka <sojkam1@fel.cvut.cz>
Fri, 17 Feb 2017 20:54:47 +0000 (21:54 +0100)
committerMichal Sojka <sojkam1@fel.cvut.cz>
Fri, 17 Feb 2017 20:54:47 +0000 (21:54 +0100)
It seems that at least Perl 5.24.1, if the parameter of 'do' (which we
use to read the configuration file) is relative patch that does not start
with ./, the file is only searched in Perl @INC path. This results in
test failure, because our configuration file in not in @INC.

tests/novaboot.wv

index 362afaaaf54fddd60e7a43bd65457cbeb890970e..a23b2c5fd8ed94903f1435116f1e0cb8a04724f5 100755 (executable)
@@ -59,7 +59,7 @@ echo '$test_a = 1;' > dir/a
 echo '$test_c = 2;' > dir/c
 echo '$test_c = 1;' > dir/b    # Overriden by the 'c' file
 echo '$test_ign=1;' > dir/b.txt        # Ignored
-WVPASS sh -c 'NOVABOOT_CONFIG_DIR=dir novaboot --dump-config > config'
+WVPASS sh -c 'NOVABOOT_CONFIG_DIR=./dir novaboot --dump-config > config'
 WVPASS sh -c 'grep \$test config > test'
 WVPASS diff -u - test <<'EOF'
 $test_a = 1;