projects / platform / upstream / perl.git / commit
? search:
summary | shortlog | log | commit | commitdiff | tree
(parent: b8f07b9) | patch
${^MPEN} had been treated as a synonym of ${^MATCH} due to a missing break;
authorNicholas Clark <nick@ccl4.org>
Thu, 29 Aug 2013 08:47:31 +0000 (10:47 +0200)
committerNicholas Clark <nick@ccl4.org>
Thu, 29 Aug 2013 08:51:18 +0000 (10:51 +0200)
commit66230c862b0c3d1a8bbb014cc747d938d0e90149
tree6ff8d3370898ab929ea2e565cbaae959467672a7tree | snapshot
parentb8f07b9f533b110a924514a9e3dd9017a224fd36commit | diff
${^MPEN} had been treated as a synonym of ${^MATCH} due to a missing break;

A missing break; in Perl_gv_fetchpvn_flags() meant that the variable ${^MPEN}
had been behaving as a synonym of ${^MATCH}. Adding the break makes ${^MPEN}
behave like all other unused multi-character control character variable.
gv.c diff | blob | history
t/op/magic.t diff | blob | history
Domain: System / Base;