From 846be114022639b7d7033ca6ab56113409e4e6ef Mon Sep 17 00:00:00 2001
From: Jarkko Hietaniemi <jhi@iki.fi>
Date: Tue, 11 Dec 2001 15:55:51 +0000
Subject: [PATCH] We need DWIM cpps.

p4raw-id: //depot/perl@13626
---
 perlio.c | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/perlio.c b/perlio.c
index 9adeea7..c45c71a 100644
--- a/perlio.c
+++ b/perlio.c
@@ -861,10 +861,10 @@ PerlIO_default_buffer(pTHX_ PerlIO_list_t *av)
     PerlIO_funcs *tab = &PerlIO_perlio;
 #ifdef PERLIO_CRLF
     tab = &PerlIO_crlf;
-#endif
+#else
     if (PerlIO_stdio.Set_ptrcnt)
         tab = &PerlIO_stdio;
-#else
+#endif
     PerlIO_debug("Pushing %s\n", tab->name);
     PerlIO_list_push(aTHX_ av, PerlIO_find_layer(aTHX_ tab->name, 0, 0),
 		     &PL_sv_undef);
-- 
2.7.4