diff options
author | Bjorn Munch <bjorn.munch@oracle.com> | 2012-05-15 09:19:58 +0200 |
---|---|---|
committer | Bjorn Munch <bjorn.munch@oracle.com> | 2012-05-15 09:19:58 +0200 |
commit | 0e66663159df34146ccadd69bc1ad2161cf8ba11 (patch) | |
tree | 82adb24019a35f5400903134b78e234bee336fa2 /mysql-test/lib/My | |
parent | d8faf3f1798eeea3147fb6cc95d8bd96c3a3878c (diff) | |
parent | e72278fd423d98181d1c4da34e8369e7219b05f8 (diff) | |
download | mariadb-git-0e66663159df34146ccadd69bc1ad2161cf8ba11.tar.gz |
Upmerge optional testsuite path
Diffstat (limited to 'mysql-test/lib/My')
-rw-r--r-- | mysql-test/lib/My/Find.pm | 7 |
1 files changed, 4 insertions, 3 deletions
diff --git a/mysql-test/lib/My/Find.pm b/mysql-test/lib/My/Find.pm index 952a3c4143d..1f99c470e73 100644 --- a/mysql-test/lib/My/Find.pm +++ b/mysql-test/lib/My/Find.pm @@ -126,9 +126,9 @@ sub my_find_file { # # sub my_find_dir { - my ($base, $paths, $dirs, $required)= @_; - croak "usage: my_find_dir(<base>, <paths>[, <dirs>])" - unless (@_ == 3 or @_ == 2); + my ($base, $paths, $dirs, $optional)= @_; + croak "usage: my_find_dir(<base>, <paths>[, <dirs>[, <optional>]])" + unless (@_ == 3 or @_ == 2 or @_ == 4); # ------------------------------------------------------- # Find and return the first directory @@ -136,6 +136,7 @@ sub my_find_dir { foreach my $path (my_find_paths($base, $paths, $dirs)) { return $path if ( -d $path ); } + return "" if $optional; find_error($base, $paths, $dirs); } |