[inseparable changes from match from perl-5.003_97 to perl-5.003_97a]
[perl.git] / pp_sys.c
index 00012c3..45290d6 100644 (file)
--- a/pp_sys.c
+++ b/pp_sys.c
@@ -3991,7 +3991,7 @@ PP(pp_gpwent)
 PP(pp_spwent)
 {
     dSP;
-#ifdef HAS_PASSWD
+#if defined(HAS_PASSWD) && !defined(CYGWIN32)
     setpwent();
     RETPUSHYES;
 #else