diff options
| author | msvensson@neptunus.(none) <> | 2006-11-03 12:32:05 +0100 |
|---|---|---|
| committer | msvensson@neptunus.(none) <> | 2006-11-03 12:32:05 +0100 |
| commit | 7b4a8e41a69a56cd0bdb4bc1a03445ab5d1a0cb1 (patch) | |
| tree | 4b22a547bab1827bc3041ace71d3fdab5da34262 /mysql-test/lib/mtr_misc.pl | |
| parent | 580b540d257c7ddab3ef26bb01bd7c0e8d17b70a (diff) | |
| download | mariadb-git-7b4a8e41a69a56cd0bdb4bc1a03445ab5d1a0cb1.tar.gz | |
Fix mysql-test-run.pl for "bin dist" look in "bin" directory for client binaries as well.
Diffstat (limited to 'mysql-test/lib/mtr_misc.pl')
| -rw-r--r-- | mysql-test/lib/mtr_misc.pl | 41 |
1 files changed, 21 insertions, 20 deletions
diff --git a/mysql-test/lib/mtr_misc.pl b/mysql-test/lib/mtr_misc.pl index ea163eeba22..846ca25b725 100644 --- a/mysql-test/lib/mtr_misc.pl +++ b/mysql-test/lib/mtr_misc.pl @@ -66,9 +66,10 @@ sub mtr_add_arg ($$@) { ############################################################################## -# Note - More specific paths should be given before less specific. For examle -# /client/debug should be listed before /client - +# +# NOTE! More specific paths should be given before less specific. +# For example /client/debug should be listed before /client +# sub mtr_path_exists (@) { foreach my $path ( @_ ) { @@ -84,9 +85,11 @@ sub mtr_path_exists (@) { } } -# Note - More specific paths should be given before less specific. For examle -# /client/debug should be listed before /client +# +# NOTE! More specific paths should be given before less specific. +# For example /client/debug should be listed before /client +# sub mtr_script_exists (@) { foreach my $path ( @_ ) { @@ -109,17 +112,11 @@ sub mtr_script_exists (@) { } } -sub mtr_file_exists (@) { - foreach my $path ( @_ ) - { - return $path if -e $path; - } - return ""; -} - -# Note - More specific paths should be given before less specific. For examle -# /client/debug should be listed before /client +# +# NOTE! More specific paths should be given before less specific. +# For example /client/debug should be listed before /client +# sub mtr_file_exists (@) { foreach my $path ( @_ ) { @@ -128,9 +125,11 @@ sub mtr_file_exists (@) { return ""; } -# Note - More specific paths should be given before less specific. For examle -# /client/debug should be listed before /client +# +# NOTE! More specific paths should be given before less specific. +# For example /client/debug should be listed before /client +# sub mtr_exe_maybe_exists (@) { my @path= @_; @@ -149,9 +148,11 @@ sub mtr_exe_maybe_exists (@) { return ""; } -# Note - More specific paths should be given before less specific. For examle -# /client/debug should be listed before /client +# +# NOTE! More specific paths should be given before less specific. +# For example /client/debug should be listed before /client +# sub mtr_exe_exists (@) { my @path= @_; if (my $path= mtr_exe_maybe_exists(@path)) @@ -174,7 +175,7 @@ sub mtr_copy_dir($$) { my $from_dir= shift; my $to_dir= shift; -# mtr_verbose("Copying from $from_dir to $to_dir"); + # mtr_verbose("Copying from $from_dir to $to_dir"); mkpath("$to_dir"); opendir(DIR, "$from_dir") |