diff options
Diffstat (limited to 't/op')
-rwxr-xr-x | t/op/mkdir.t | 3 |
1 files changed, 3 insertions, 0 deletions
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"); |