2 files changed, 5 insertions, 4 deletions
diff --git a/MANIFEST b/MANIFEST
index e5f39df1e4..f389417318 100644
--- a/MANIFEST
+++ b/MANIFEST
@@ -2013,6 +2013,7 @@ win32/vmem.h		Perl "host" memory manager
 win32/win32.c		Win32 port
 win32/win32.h		Win32 port
 win32/win32iop.h	Win32 port
+win32/win32io.c		Win32 PerlIO layer support
 win32/win32sck.c	Win32 port
 win32/win32thread.c	Win32 functions for threads
 win32/win32thread.h	Win32 port mapping to threads
diff --git a/perlio.c b/perlio.c
index a3da82e92a..c9b7f72067 100644
--- a/perlio.c
+++ b/perlio.c
@@ -766,13 +766,13 @@ PerlIO_default_layers(pTHX)
    const char *s  = (PL_tainting) ? Nullch : PerlEnv_getenv("PERLIO");
    PerlIO_funcs *osLayer = &PerlIO_unix;
    PerlIO_def_layerlist  = PerlIO_list_alloc();
+   PerlIO_define_layer(aTHX_ &PerlIO_unix);
 #ifdef WIN32
+   PerlIO_define_layer(aTHX_ &PerlIO_win32);
+#if 0
    osLayer = &PerlIO_win32;
-   PerlIO_define_layer(aTHX_ &PerlIO_unix);
-#else
-   osLayer = &PerlIO_unix;
 #endif
-   PerlIO_define_layer(aTHX_ osLayer);
+#endif
    PerlIO_define_layer(aTHX_ &PerlIO_raw);
    PerlIO_define_layer(aTHX_ &PerlIO_perlio);
    PerlIO_define_layer(aTHX_ &PerlIO_stdio);