projects
/
platform
/
upstream
/
perl.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
| inline |
side by side
(parent:
531c60d
)
We need DWIM cpps.
author
Jarkko Hietaniemi
<jhi@iki.fi>
Tue, 11 Dec 2001 15:55:51 +0000
(15:55 +0000)
committer
Jarkko Hietaniemi
<jhi@iki.fi>
Tue, 11 Dec 2001 15:55:51 +0000
(15:55 +0000)
p4raw-id: //depot/perl@13626
perlio.c
patch
|
blob
|
history
diff --git
a/perlio.c
b/perlio.c
index
9adeea7
..
c45c71a
100644
(file)
--- 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;
-#e
ndif
+#e
lse
if (PerlIO_stdio.Set_ptrcnt)
tab = &PerlIO_stdio;
-#e
lse
+#e
ndif
PerlIO_debug("Pushing %s\n", tab->name);
PerlIO_list_push(aTHX_ av, PerlIO_find_layer(aTHX_ tab->name, 0, 0),
&PL_sv_undef);