pp_chdir Win32 fix

Message-ID: <20010920212134.Y28291@blackrider>

p4raw-id: //depot/perl@12107

diff --git a/pp_sys.c b/pp_sys.c
index 0fb45215d88021a6ba59c2d174e18f873183d48f..40273ce31579502bae9a5f5cb0824463b288842e 100644 (file)
--- a/pp_sys.c
+++ b/pp_sys.c
@@ -3385,8 +3385,10 @@ PP(pp_chdir)
        {
            tmps = SvPV(*svp, n_a);
        }
-       else
-           tmps = Nullch;
+       else {            
+            PUSHi(0);
+            RETURN;
+        }
     }
     else
        tmps = POPpx;