This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
Change newSVpvn("…", …) to newSVpvs("…")
[perl5.git] / ext / PerlIO-encoding / encoding.xs
index fababd1..cc329d3 100644 (file)
@@ -650,7 +650,7 @@ BOOT:
        Perl_warner(aTHX_ packWARN(WARN_IO), ":encoding without 'use Encode'");
 #endif
        /* The SV is magically freed by load_module */
-       load_module(PERL_LOADMOD_NOIMPORT, newSVpvn("Encode", 6), Nullsv, Nullsv);
+       load_module(PERL_LOADMOD_NOIMPORT, newSVpvs("Encode"), Nullsv, Nullsv);
        assert(sp == PL_stack_sp);
     }
     PUSHMARK(sp);