mirror of
https://github.com/MariaDB/server.git
synced 2025-07-29 05:21:33 +03:00
Backport of patch for bug#24471
mysql-test-run.pl: Removed "use diagnostics", reduces Perl speed significantly. Can be enabled with "perl -Mdiagnostics mysql-test-run.pl". mtr_report.pl: Don't try output "skipped" comment if there is none (bug#24471)
This commit is contained in:
@ -94,10 +94,14 @@ sub mtr_report_test_skipped ($) {
|
|||||||
{
|
{
|
||||||
print "[ disabled ] $tinfo->{'comment'}\n";
|
print "[ disabled ] $tinfo->{'comment'}\n";
|
||||||
}
|
}
|
||||||
else
|
elsif ( $tinfo->{'comment'} )
|
||||||
{
|
{
|
||||||
print "[ skipped ] $tinfo->{'comment'}\n";
|
print "[ skipped ] $tinfo->{'comment'}\n";
|
||||||
}
|
}
|
||||||
|
else
|
||||||
|
{
|
||||||
|
print "[ skipped ]\n";
|
||||||
|
}
|
||||||
}
|
}
|
||||||
|
|
||||||
sub mtr_report_tests_not_skipped_though_disabled ($) {
|
sub mtr_report_tests_not_skipped_though_disabled ($) {
|
||||||
|
@ -66,7 +66,6 @@ use IO::Socket::INET;
|
|||||||
use Data::Dumper;
|
use Data::Dumper;
|
||||||
use strict;
|
use strict;
|
||||||
use warnings;
|
use warnings;
|
||||||
use diagnostics;
|
|
||||||
|
|
||||||
select(STDOUT);
|
select(STDOUT);
|
||||||
$| = 1; # Automatically flush STDOUT
|
$| = 1; # Automatically flush STDOUT
|
||||||
|
Reference in New Issue
Block a user