diff options
| -rwxr-xr-x | t/lib/safe2.t | 2 | ||||
| -rwxr-xr-x | t/op/mkdir.t | 3 |
2 files changed, 5 insertions, 0 deletions
diff --git a/t/lib/safe2.t b/t/lib/safe2.t index feaab16956..40c5098058 100755 --- a/t/lib/safe2.t +++ b/t/lib/safe2.t @@ -8,6 +8,8 @@ BEGIN { print "1..0\n"; exit 0; } + # test 30 rather naughtily expects English error messages + $ENV{'LC_ALL'} = 'C'; } # Tests Todo: diff --git a/t/op/mkdir.t b/t/op/mkdir.t index 5a6dfe5f5c..d47570358d 100755 --- a/t/op/mkdir.t +++ b/t/op/mkdir.t @@ -6,6 +6,9 @@ print "1..7\n"; $^O eq 'MSWin32' ? `del /s /q blurfl 2>&1` : `rm -rf blurfl`; +# tests 3 and 7 rather naughtily expect English error messages +$ENV{'LC_ALL'} = 'C'; + print (mkdir('blurfl',0777) ? "ok 1\n" : "not ok 1\n"); print (mkdir('blurfl',0777) ? "not ok 2\n" : "ok 2\n"); print ($! =~ /exist/ ? "ok 3\n" : "not ok 3\n"); |