Skip Menu |

Preferred bug tracker

Please visit the preferred bug tracker to report your issue.

This queue is for tickets about the YAML CPAN distribution.

Report information
The Basics
Id: 73483
Status: resolved
Priority: 0/
Queue: YAML
People
Owner: Nobody in particular
Requestors: ANDK [...] cpan.org
Cc:
AdminCc:
Bug Information
Severity: Normal
Broken in: 0.77
Fixed in: (no value)

History Show all quoted text
  Mon Dec 26 10:39:11 2011 ANDK [...] cpan.org - Ticket created
Subject: Bleadperl v5.15.6-147-g415d4c6 breaks INGY/YAML-0.77.tar.gz
Just a cross reference https://rt.perl.org:443/rt3/Ticket/Display.html?id=107058 Sorry for the spam,
  Mon Jan 02 00:03:20 2012 $_ = 'spro^^*%*^6ut# [...] &$%*c>#!^!#&!pan.org'; y/a-z.@//cd; print - Correspondence added
On Mon Dec 26 10:39:11 2011, ANDK wrote: Show quoted text
> Just a cross reference > > https://rt.perl.org:443/rt3/Ticket/Display.html?id=107058
Here’s a patch.
Subject: open_IZrEB97u.txt
diff -rup YAML-0.77-4Pwy2R/t/dump-code.t YAML-0.77-4Pwy2R-copy/t/dump-code.t --- YAML-0.77-4Pwy2R/t/dump-code.t 2011-03-31 09:44:53.000000000 -0700 +++ YAML-0.77-4Pwy2R-copy/t/dump-code.t 2012-01-01 21:01:44.000000000 -0800 @@ -1,5 +1,13 @@ use t::TestYAML tests => 7; +use B::Deparse; +if (new B::Deparse -> coderef2text ( sub { no strict; 1; use strict; 1; }) + =~ 'refs') { + local $/; + (my $data = <DATA>) =~ s/use strict/use strict 'refs'/g; + open DATA, '<', \$data; +} + no_diff; run_roundtrip_nyn('dumper'); @@ -15,7 +23,7 @@ return sub { 'Something at least 30 char --- !!perl/code | { use warnings; - use strict 'refs'; + use strict; 'Something at least 30 chars'; } @@ -31,7 +39,7 @@ my $joe_random_global = sub { 'Something - &1 !!perl/code | { use warnings; - use strict 'refs'; + use strict; 'Something at least 30 chars'; } - *1 @@ -56,6 +64,6 @@ bless sub { 'Something at least 30 chars --- !!perl/code:Foo::Bar | { use warnings; - use strict 'refs'; + use strict; 'Something at least 30 chars'; }
  Mon Jan 02 00:03:21 2012 The RT System itself - Status changed from 'new' to 'open'
  Mon Jan 02 02:56:51 2012 ingy [...] cpan.org - Correspondence added
Applied ANDK++'s patch and released 0.78. Thanks!
  Mon Jan 02 02:56:53 2012 ingy [...] cpan.org - Status changed from 'open' to 'resolved'
  Tue Jan 03 15:15:16 2012 ANDK [...] cpan.org - Correspondence added
On 2012-01-02 02:56:51, INGY wrote: Show quoted text
> Applied ANDK++'s patch and released 0.78. > > Thanks!
s/ANDK/SPROUT/ Thanks, Ingy, Thanks Sprout!
  Tue Jan 03 15:15:38 2012 The RT System itself - Status changed from 'resolved' to 'open'
  Tue Jan 03 15:16:20 2012 ANDK [...] cpan.org - Correspondence added
Closing again. Just had to korrect the wrong attribution;)
  Tue Jan 03 15:16:21 2012 ANDK [...] cpan.org - Status changed from 'open' to 'resolved'