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:
Daniel Nichter
2012-08-21 16:15:44 -06:00
parent a95aa2b3bc
commit ee583ba729
14 changed files with 127 additions and 13 deletions

View File

@@ -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.
# #######################################################################