summaryrefslogtreecommitdiff
path: root/perlio.c
diff options
context:
space:
mode:
authorTels <nospam-abuse@bloodgate.com>2005-12-29 19:57:43 +0100
committerRafael Garcia-Suarez <rgarciasuarez@gmail.com>2005-12-30 11:43:42 +0000
commit89c1a98847aab770ea421d315d98085021b6187c (patch)
tree60cd0c11e3615f55d1af157a46b228d967566bae /perlio.c
parent9fb9dfd8c3b83c6bae50a175d50c256456391d4c (diff)
downloadperl-89c1a98847aab770ea421d315d98085021b6187c.tar.gz
perlio.c - gv_stashpvn() vs gv_stashpv()
Message-Id: <200512291857.59458@bloodgate.com> p4raw-id: //depot/perl@26533
Diffstat (limited to 'perlio.c')
-rw-r--r--perlio.c2
1 files changed, 1 insertions, 1 deletions
diff --git a/perlio.c b/perlio.c
index 49b1b2d1f9..1c6da020a1 100644
--- a/perlio.c
+++ b/perlio.c
@@ -867,7 +867,7 @@ XS(XS_io_MODIFY_SCALAR_ATTRIBUTES)
SV *
PerlIO_tab_sv(pTHX_ PerlIO_funcs *tab)
{
- HV * const stash = gv_stashpv("PerlIO::Layer", TRUE);
+ HV * const stash = gv_stashpvn("PerlIO::Layer", 13, TRUE);
SV * const sv = sv_bless(newRV_noinc(newSViv(PTR2IV(tab))), stash);
return sv;
}