mirror of
https://github.com/percona/percona-toolkit.git
synced 2025-09-08 11:07:58 +00:00
Add $ENV{PERCONA_VERSION_CHECK}=0 to PerconaTest so tests don't version-check. Implement v-c in half the tools. Make util/update-modules clean up its temp files.
This commit is contained in:
@@ -4304,7 +4304,7 @@ my $hdr_width = $max_width - 2; # for '# '
|
||||
my $hdr_fmt = "# %-${hdr_width}s\n";
|
||||
|
||||
sub main {
|
||||
@ARGV = @_; # set global ARGV for this package
|
||||
local @ARGV = @_; # set global ARGV for this package
|
||||
|
||||
my %summary = ( 'Total Indexes' => 0 );
|
||||
my %seen_tbl;
|
||||
@@ -4348,6 +4348,14 @@ sub main {
|
||||
my $dbh = $dp->get_dbh($dp->get_cxn_params($dsn),
|
||||
{ AutoCommit => 1, });
|
||||
|
||||
# ########################################################################
|
||||
# Do the version-check
|
||||
# ########################################################################
|
||||
if ( $o->get('version-check') && ($o->has('quiet') && !$o->get('quiet')) ) {
|
||||
Pingback::version_check($dbh);
|
||||
return 0 if $ENV{PTVCDEBUG} && PTDEBUG;
|
||||
}
|
||||
|
||||
# #######################################################################
|
||||
# Do the main work.
|
||||
# #######################################################################
|
||||
|
Reference in New Issue
Block a user