bzr commit into mysql-5.1 branch (msvensson:2670) Bug#39008

[Magnus Svensson]

#At file:///home/msvensson/mysql/5.1-rpl/

 2670 Magnus Svensson	2008-09-05
      Bug#39008 perl warning in mtr: 'use of uninitialized value in concatenation' in mtr:3995
modified:
  mysql-test/mysql-test-run.pl

per-file messages:
  mysql-test/mysql-test-run.pl
    Don't bother to remove particular files from the datadir, based on what 
    config parameters are available. Just remove whole datadir
=== modified file 'mysql-test/mysql-test-run.pl'
--- a/mysql-test/mysql-test-run.pl	2008-09-05 12:23:52 +0000
+++ b/mysql-test/mysql-test-run.pl	2008-09-05 12:40:07 +0000
@@ -4015,29 +4015,14 @@ sub start_servers($) {
     }
 
     my $datadir= $mysqld->value('datadir');
-
-    # Don't delete anything if starting dirty
     if (!$opt_start_dirty)
     {
-      my @options= ('log-bin', 'relay-log');
-
-      foreach my $option_name ( @options )  {
-	next unless $mysqld->option($option_name);
+      # Don't delete anything if starting dirty
 
-	my $value= $mysqld->value($option_name);
-
-	foreach my $file ( glob("$datadir/$value*") )
-	{
-	  #print "removing: $file\n";
-	  mtr_debug("Removing '$file'");
-	  unlink($file);
-	}
+      if (-d $datadir ) {
+	mtr_verbose(" - removing '$datadir'");
+	rmtree($datadir);
       }
-
-      # Remove old master.info and relay-log.info files
-      # from the servers datadir
-      unlink("$datadir/master.info");
-      unlink("$datadir/relay-log.info");
     }
 
     # Copy datadir from installed system db