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: 4692e66) | patch
4f890a3067e1198f missed qr// from t/re/pat.t in its refactoring in two places.
authorNicholas Clark <nick@ccl4.org>
Tue, 8 Mar 2011 09:56:48 +0000 (09:56 +0000)
committerNicholas Clark <nick@ccl4.org>
Tue, 8 Mar 2011 10:17:22 +0000 (10:17 +0000)
commit224b2e7e6be9296f0761c242069908f4a4e2bf16
treef85e2d985b2e3935f6eaf178837c3b56e57b4948tree | snapshot
parent4692e667eb5fcc19306bd345ec7d08f52a1157c6commit | diff
4f890a3067e1198f missed qr// from t/re/pat.t in its refactoring in two places.

like($@, /A pattern/, "Description") is going to compare $@ with the
*result* of matching $_ against that pattern, not that pattern.
t/re/pat.t diff | blob | blame | history
Unnamed repository; edit this file 'description' to name the repository.