projects / platform / upstream / perl.git / commit
? search:
summary | shortlog | log | commit | commitdiff | tree
(parent: 90814a4) | patch
[perl #96230] Stop s/$qr// from reusing last pattern
authorFather Chrysostomos <sprout@cpan.org>
Tue, 16 Oct 2012 21:36:43 +0000 (14:36 -0700)
committerFather Chrysostomos <sprout@cpan.org>
Tue, 16 Oct 2012 21:36:43 +0000 (14:36 -0700)
commit6a97c51d3ccb6044a8e13896ba95a46e330ffa4b
tree2210890372625d53dceca7023fffbe62aebec9dctree | snapshot
parent90814a4e3c744b161cec74d3372d8d7546b0c9dacommit | diff
[perl #96230] Stop s/$qr// from reusing last pattern

qr// should not be using the last-successful pattern, because it is
"(?^:)", not the empty pattern.  A stringified qr// does not use the
last-successful pattern.

This was fixed for m/$qr/ (and =~ qr//) in commit 7e31363783, but
s/$qr// was left out.
pod/perldelta.pod diff | blob | history
pp_hot.c diff | blob | history
t/op/qr.t diff | blob | history
Domain: System / Base;