~drizzle-trunk/drizzle/development

« back to all changes in this revision

Viewing changes to util/simplify-mysqltest.pl

changes to support large-scale mysqltest simplifications

Show diffs side-by-side

added added

removed removed

Lines of Context:
15
15
# Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301
16
16
# USA
17
17
 
 
18
$| = 1;
 
19
 
18
20
use strict;
19
21
use lib 'lib';
20
22
use lib '../lib';
96
98
        open (ORACLE_MYSQLTEST, ">t/$testfile") or croak "Unable to open $testfile: $!";
97
99
 
98
100
        print ORACLE_MYSQLTEST join("\n",@{$header})."\n\n";
99
 
        print ORACLE_MYSQLTEST $oracle_mysqltest."\n";
100
 
        print ORACLE_MYSQLTEST "\n".join("\n",@{$footer})."\n";
 
101
        print ORACLE_MYSQLTEST $oracle_mysqltest;
 
102
        print ORACLE_MYSQLTEST "\n\n".join("\n",@{$footer})."\n";
101
103
        close ORACLE_MYSQLTEST;
102
104
 
103
105
        my $mysqldopt = $config->genOpt('--mysqld=--', 'mysqld');
121
123
                say("Messages about unsafe replication found in master error log.");
122
124
                return ORACLE_ISSUE_NO_LONGER_REPEATABLE;
123
125
        } elsif ($grep_exit_code > 1) {
124
 
                die("grep on the mysqld.1.err error log failed");
 
126
                say("grep on the mysqld.1.err error log failed");
125
127
        }
126
128
 
127
129
        ########################################################################