1 files changed, 1 insertions, 1 deletions
diff --git a/t/op/while.t b/t/op/while.t
index 1e8eb44d94..a0f2c67638 100644
--- a/t/op/while.t
+++ b/t/op/while.t
@@ -1,7 +1,7 @@
 #!./perl
 
 BEGIN {
-    chdir 't';
+    chdir 't' if -d 't';
     @INC = "../lib";
     require "./test.pl";
 }