[PATCH] Fix a test failure with Perl 5.12.0 due to improved regexp comparisons

Niko Tyni ntyni at debian.org
Fri May 14 06:56:02 UTC 2010


The regexp implementation changed in the Perl 5.11 series, and
test_deeply() now compares them more carefully, as shown by

 perl -MTest::More=no_plan -e 'is_deeply(qr/a/s, qr/a/)'
---
 t/fixture-selenese.t |    4 ++--
 1 files changed, 2 insertions(+), 2 deletions(-)

diff --git a/t/fixture-selenese.t b/t/fixture-selenese.t
index 4e9f6d0..c83b720 100644
--- a/t/fixture-selenese.t
+++ b/t/fixture-selenese.t
@@ -29,9 +29,9 @@ EOT
         [ title_like => qr/\Qmonkey\E/ ],
         [ text_like => ['//body', qr/\Qwater\E/] ],
         [ text_like => ['//body', qr/\Qpen?\E/] ],
-        [ text_like => ['//body', qr/pen?/] ],
+        [ text_like => ['//body', qr/pen?/s] ],
         [ confirmation_like => qr/\Qpen?\E/ ],
-        [ confirmation_like => qr/pen?/ ],
+        [ confirmation_like => qr/pen?/s ],
         [ click_ok => 'foo' ],
         [ wait_for_page_to_load_ok => 10000 ],
     ],
-- 
1.7.1


--2fHTh5uZTiUOsy+g--





More information about the pkg-perl-maintainers mailing list