search for clone several step in the path name

parent fbf15908
...@@ -409,13 +409,20 @@ sub main () { ...@@ -409,13 +409,20 @@ sub main () {
{ {
# use default and add any extra_suites as defined # use default and add any extra_suites as defined
$opt_suites= $opt_suites_default; $opt_suites= $opt_suites_default;
my $ddd= basename(dirname($glob_mysql_test_dir)); my $ccc= dirname($glob_mysql_test_dir);
foreach my $extra_suite (@extra_suites) my $found= 0;
while (!$found and !($ccc eq "/") and !($ccc eq ""))
{ {
if ($extra_suite->[0] eq "$ddd") my $ddd= basename($ccc);
foreach my $extra_suite (@extra_suites)
{ {
$opt_suites= "$extra_suite->[1],$opt_suites"; if ($extra_suite->[0] eq "$ddd")
{
$opt_suites= "$extra_suite->[1],$opt_suites";
$found= 1;
}
} }
$ccc= dirname($ccc);
} }
} }
......
Markdown is supported
0%
or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment