diff options
| author | Father Chrysostomos <sprout@cpan.org> | 2012-11-03 11:33:56 -0700 |
|---|---|---|
| committer | Father Chrysostomos <sprout@cpan.org> | 2012-11-04 22:45:32 -0800 |
| commit | 1e5f02b39a83c2923bcd16343fa6a8ca8ea215f2 (patch) | |
| tree | c87c67b6386e0b6ab764f8a36c15180d7c619552 /pp_ctl.c | |
| parent | 9f81bf163fceffa4234152591651ddc790e7a923 (diff) | |
| download | perl-1e5f02b39a83c2923bcd16343fa6a8ca8ea215f2.tar.gz | |
Stop require nonexistent::module from leaking
This leak was caused by v5.17.4-125-gf7ee53b.
Diffstat (limited to 'pp_ctl.c')
| -rw-r--r-- | pp_ctl.c | 2 |
1 files changed, 1 insertions, 1 deletions
@@ -3933,7 +3933,7 @@ PP(pp_require) if (namesv) { /* did we lookup @INC? */ AV * const ar = GvAVn(PL_incgv); I32 i; - SV *const msg = newSVpv("", 0); + SV *const msg = newSVpvs_flags("", SVs_TEMP); SV *const inc = newSVpvs_flags("", SVs_TEMP); for (i = 0; i <= AvFILL(ar); i++) { sv_catpvs(inc, " "); |