X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=utf8.c;h=b43c74ba108764869d1b814421f02bf165936823;hb=5b6782b28b8a9d505447276bdd3de3a802f641dd;hp=7d85a885ae0c2af783fd374e0de1a0c4019f0c0e;hpb=fdf8c08824a2cd37d9fab91f3056bff4358cb60b;p=p5sagit%2Fp5-mst-13.2.git diff --git a/utf8.c b/utf8.c index 7d85a88..b43c74b 100644 --- a/utf8.c +++ b/utf8.c @@ -1560,7 +1560,7 @@ Perl_swash_init(pTHX_ const char* pkg, const char* name, SV *listsv, I32 minbits dSP; const size_t pkg_len = strlen(pkg); const size_t name_len = strlen(name); - HV * const stash = gv_stashpvn(pkg, pkg_len, FALSE); + HV * const stash = gv_stashpvn(pkg, pkg_len, 0); SV* errsv_save; PUSHSTACKi(PERLSI_MAGIC);