diff --git a/Changes b/Changes index b6cc3ec..24fc90b 100644 --- a/Changes +++ b/Changes @@ -1,6 +1,8 @@ Revision history for CPAN-Testers-Data-Generator ================================================ + - arch os no longer needs to decode JSON. + 1.13 2014-03-20 - enable mysql_auto_reconnect. - updates from live fixes. diff --git a/lib/CPAN/Testers/Data/Generator.pm b/lib/CPAN/Testers/Data/Generator.pm index efdd034..646e9e0 100644 --- a/lib/CPAN/Testers/Data/Generator.pm +++ b/lib/CPAN/Testers/Data/Generator.pm @@ -1296,8 +1296,8 @@ sub _check_arch_os { return if($text && $self->{report}{osname} && lc $text eq lc $self->{report}{osname}); #print STDERR "_check: metabase=".Dumper($self->{report}{metabase})."\n"; - my $fact = decode_json($self->{report}{metabase}{'CPAN::Testers::Fact::LegacyReport'}{content}); - my $textreport = $fact->{textreport}; + my $textreport = $self->{report}{metabase}{'CPAN::Testers::Fact::LegacyReport'}{content}{textreport}; + $textreport =~ s/\\n/\n/g; # newlines may be escaped # create a fake mail, as CTC::Article parses a mail like text block my $mail = <