percona/percona-toolkit
1
0
Fork 0
mirror of https://github.com/percona/percona-toolkit.git synced 2025-12-21 02:00:45 +08:00
Code Issues Packages Projects Releases Wiki Activity

Fix OptionParser to parse new version format.

Browse Source
This commit is contained in:
Daniel Nichter
2011-09-01 09:01:34 -06:00
parent dcceaae66b
commit 1373f69361
2 changed files with 2 additions and 2 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
lib/OptionParser.pm
View File

@@ -221,7 +221,7 @@ sub get_specs {
$self->{DSNParser} = DSNParser->new(opts => \@dsn_opts); $self->{DSNParser} = DSNParser->new(opts => \@dsn_opts);
} }
if ( $contents =~ m/^(Percona Toolkit v.+)$/m ) { if ( $contents =~ m/^=head1 VERSION\n\n^(.+)$/m ) {
$self->{version} = $1; $self->{version} = $1;
MKDEBUG && _d($self->{version}); MKDEBUG && _d($self->{version});
} }

2
t/pt-visual-explain/pt-visual-explain.t
View File

@@ -56,7 +56,7 @@ like(
$output = `$trunk/bin/pt-visual-explain --version 2>&1`; $output = `$trunk/bin/pt-visual-explain --version 2>&1`;
like( like(
$output, $output,
qr/v\d\.\d.\d+/, qr/^pt-visual-explain \d\.\d\.\d+/m,
'--version works (bug 823394)' '--version works (bug 823394)'
); );