percona/percona-toolkit
1
0
Fork 0
mirror of https://github.com/percona/percona-toolkit.git synced 2025-10-20 17:49:56 +00:00
Code Issues Packages Projects Releases Wiki Activity

Check for ../../.bzr for when a tool is ran as a module in a test.

Browse Source
This commit is contained in:
Daniel Nichter
2013-02-22 08:00:55 -07:00
parent 550bb3887a
commit b286da993f
20 changed files with 62 additions and 20 deletions
Download Patch File Download Diff File Expand all files Collapse all files

6
lib/VersionCheck.pm
View File

@@ -106,8 +106,12 @@ sub version_check {
# However, we do not want dev and testing to v-c, so even though this
# sub is called, force should be false because $o->got('version-check')
# is false, then check for a .bzr dir which indicates dev or testing.
# ../.bzr is when a tool is ran from /bin/; ../../.bzr is when a tool
# is ran as a module from /t/<tool>/.
PTDEBUG && _d('FindBin::Bin:', $FindBin::Bin);
if ( !$args{force} ) {
if ( $FindBin::Bin && -d "$FindBin::Bin/../.bzr" ) {
if ( $FindBin::Bin
&& (-d "$FindBin::Bin/../.bzr" || -d "$FindBin::Bin/../../.bzr") ) {
PTDEBUG && _d("$FindBin::Bin/../.bzr disables --version-check");
return;
}