Skip Menu |

This queue is for tickets about the Test-Log4perl CPAN distribution.

Report information
The Basics
Id: 70002
Status: open
Priority: 0/
Queue: Test-Log4perl
People
Owner: Nobody in particular
Requestors:
Cc:
AdminCc:
Bug Information
Severity: (no value)
Broken in: (no value)
Fixed in: (no value)

History Show all quoted text
  Wed Aug 03 16:55:54 2011 gregoa [...] cpan.org - Ticket created
From: gregoa [...] cpan.org
Subject: libtest-log4perl-perl: FTBFS with perl 5.14: tests fail
This bug has been forwarded from http://bugs.debian.org/636521 This package FTBFS with perl 5.14: # Failed test 'getting wrong message' # at t/04re.t line 42. # STDERR is: # # Failed test 'Log4perl test' # # at t/04re.t line 40. # # 1st message logged wasn't what we expected: # # message was 'my hair is on fire!' # # not like '(?^:tree)' # # (Offending log call from line 39 in t/04re.t) # # not: # /#\s+Failed\ test.*?\n?.*?at\ t\/04re\.t line 40.*\n?/ # # # 1st message logged wasn't what we expected: # # # message was 'my hair is on fire!' # # # not like '(?-xism:tree)' # # # (Offending log call from line 39 in t/04re.t) # # as expected t/04re.t ... Failed 1/4 test programs. 1/21 subtests failed. Failed 1/2 subtests Cheers, gregor, Debian Perl Group
  Wed Nov 16 12:59:14 2011 gregoa [...] cpan.org - Correspondence added
Quick patch attached.
Subject: perl5.14-re.patch
Description: regexp stringification is different Origin: vendor Bug: https://rt.cpan.org/Ticket/Display.html?id=70002 Forwarded: https://rt.cpan.org/Ticket/Display.html?id=70002 Bug-Debian: http://bugs.debian.org/636521 Author: gregor herrmann <gregoa@debian.org> Last-Update: 2011-11-16 --- a/t/04re.t +++ b/t/04re.t @@ -27,11 +27,15 @@ ######################################################## +# perldelta 5.14 +# Accept both old and new-style stringification +my $modifiers = (qr/foobar/ =~ /\Q(?^/) ? "^" : "-xism"; + test_out("not ok 1 - Log4perl test"); test_fail(+9); test_diag("1st message logged wasn't what we expected:"); test_diag(" message was 'my hair is on fire!'"); -test_diag(" not like '(?-xism:tree)'"); +test_diag(" not like '(?$modifiers:tree)'"); test_diag(" (Offending log call from line ".(__LINE__+4)." in ".filename().")"); Test::Log4perl->start();
  Wed Nov 16 12:59:15 2011 The RT System itself - Status changed from 'new' to 'open'