Bug 20956: (QA follow-up) Restore info pretty
I restored the pretty code for the info file because the page needs to be able to wrap, like it does for other logs. Signed-off-by: David Nind <david@davidnind.com> Signed-off-by: Lisette Scheer <lisette@bywatersolutions.com> Signed-off-by: Martin Renvoize <martin.renvoize@openfifth.co.uk>
This commit is contained in:
parent
f528142daa
commit
9d20ea636a
|
|
@ -234,6 +234,17 @@ if ($do_it) {
|
|||
}
|
||||
}
|
||||
}
|
||||
if ( $result->{module} eq 'MEMBERS' ) {
|
||||
my $json_engine = JSON->new->utf8->canonical(1)->pretty(1);
|
||||
if ( $result->{info} && $result->{info} =~ /^[{\[]/ ) {
|
||||
my $perl_info = $json_engine->decode( $result->{info} );
|
||||
$result->{info} = $json_engine->encode($perl_info);
|
||||
}
|
||||
if ( $result->{diff} && $result->{diff} =~ /^[{\[]/ ) {
|
||||
my $perl_diff = $json_engine->decode( $result->{diff} );
|
||||
$result->{diff} = $json_engine->encode($perl_diff);
|
||||
}
|
||||
}
|
||||
push @data, $result;
|
||||
}
|
||||
if ( $output eq "screen" ) {
|
||||
|
|
|
|||
Loading…
Reference in New Issue