This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
https://perl5.git.perl.org / perl5.git / commit
? search:
summary | shortlog | log | commit | commitdiff | tree
(parent: 5840701) | patch
[perl #118297] Fix interpolating downgraded variables into upgraded regexp
authorDagfinn Ilmari Mannsåker <ilmari@ilmari.org>
Tue, 4 Jun 2013 17:15:24 +0000 (18:15 +0100)
committerFather Chrysostomos <sprout@cpan.org>
Wed, 5 Jun 2013 03:17:55 +0000 (20:17 -0700)
commitb8372399b387c0e276aee3d41b3c7833dd08087b
tree109d064d3b0452191b02ad1d590454cdc0a73ab6tree | snapshot
parent5840701a1aaa2086a9631a3f4f153e3c9f9a0a9fcommit | diff
[perl #118297] Fix interpolating downgraded variables into upgraded regexp

The code alredy upgraded the pattern if interpolating an upgraded
string into it, but not vice versa.  Just use sv_catsv_nomg() instead
of sv_catpvn_nomg(), so that it can upgrade as necessary.
regcomp.c diff | blob | blame | history
t/re/pat.t diff | blob | blame | history
Unnamed repository; edit this file 'description' to name the repository.