percona/percona-toolkit
1
0
Fork 0
mirror of https://github.com/percona/percona-toolkit.git synced 2026-02-28 02:07:54 +08:00
Code Issues Packages Projects Releases Wiki Activity

Update Quoter in all tools again.

Browse Source
This commit is contained in:
Daniel Nichter
2013-02-18 12:53:15 -07:00
parent 6d1c96e445
commit 40fd007644
16 changed files with 16 additions and 16 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
bin/pt-archiver
View File

@@ -2591,7 +2591,7 @@ sub join_quote {
sub serialize_list {
my ( $self, @args ) = @_;
PTDEBUG && _d('Serializing', Dumper(\@args));
die "Cannot serialize an empty array" unless scalar @args;
return unless @args;
my @parts;
foreach my $arg ( @args ) {

2
bin/pt-deadlock-logger
View File

@@ -1799,7 +1799,7 @@ sub join_quote {
sub serialize_list {
my ( $self, @args ) = @_;
PTDEBUG && _d('Serializing', Dumper(\@args));
die "Cannot serialize an empty array" unless scalar @args;
return unless @args;
my @parts;
foreach my $arg ( @args ) {

2
bin/pt-duplicate-key-checker
View File

@@ -133,7 +133,7 @@ sub join_quote {
sub serialize_list {
my ( $self, @args ) = @_;
PTDEBUG && _d('Serializing', Dumper(\@args));
die "Cannot serialize an empty array" unless scalar @args;
return unless @args;
my @parts;
foreach my $arg ( @args ) {

2
bin/pt-find
View File

@@ -1531,7 +1531,7 @@ sub join_quote {
sub serialize_list {
my ( $self, @args ) = @_;
PTDEBUG && _d('Serializing', Dumper(\@args));
die "Cannot serialize an empty array" unless scalar @args;
return unless @args;
my @parts;
foreach my $arg ( @args ) {

2
bin/pt-fk-error-logger
View File

@@ -1154,7 +1154,7 @@ sub join_quote {
sub serialize_list {
my ( $self, @args ) = @_;
PTDEBUG && _d('Serializing', Dumper(\@args));
die "Cannot serialize an empty array" unless scalar @args;
return unless @args;
my @parts;
foreach my $arg ( @args ) {

2
bin/pt-heartbeat
View File

@@ -2469,7 +2469,7 @@ sub join_quote {
sub serialize_list {
my ( $self, @args ) = @_;
PTDEBUG && _d('Serializing', Dumper(\@args));
die "Cannot serialize an empty array" unless scalar @args;
return unless @args;
my @parts;
foreach my $arg ( @args ) {

2
bin/pt-index-usage
View File

@@ -516,7 +516,7 @@ sub join_quote {
sub serialize_list {
my ( $self, @args ) = @_;
PTDEBUG && _d('Serializing', Dumper(\@args));
die "Cannot serialize an empty array" unless scalar @args;
return unless @args;
my @parts;
foreach my $arg ( @args ) {

2
bin/pt-kill
View File

@@ -4192,7 +4192,7 @@ sub join_quote {
sub serialize_list {
my ( $self, @args ) = @_;
PTDEBUG && _d('Serializing', Dumper(\@args));
die "Cannot serialize an empty array" unless scalar @args;
return unless @args;
my @parts;
foreach my $arg ( @args ) {

2
bin/pt-online-schema-change
View File

@@ -2747,7 +2747,7 @@ sub join_quote {
sub serialize_list {
my ( $self, @args ) = @_;
PTDEBUG && _d('Serializing', Dumper(\@args));
die "Cannot serialize an empty array" unless scalar @args;
return unless @args;
my @parts;
foreach my $arg ( @args ) {

2
bin/pt-query-advisor
View File

@@ -1542,7 +1542,7 @@ sub join_quote {
sub serialize_list {
my ( $self, @args ) = @_;
PTDEBUG && _d('Serializing', Dumper(\@args));
die "Cannot serialize an empty array" unless scalar @args;
return unless @args;
my @parts;
foreach my $arg ( @args ) {

2
bin/pt-query-digest
View File

@@ -535,7 +535,7 @@ sub join_quote {
sub serialize_list {
my ( $self, @args ) = @_;
PTDEBUG && _d('Serializing', Dumper(\@args));
die "Cannot serialize an empty array" unless scalar @args;
return unless @args;
my @parts;
foreach my $arg ( @args ) {

2
bin/pt-slave-restart
View File

@@ -131,7 +131,7 @@ sub join_quote {
sub serialize_list {
my ( $self, @args ) = @_;
PTDEBUG && _d('Serializing', Dumper(\@args));
die "Cannot serialize an empty array" unless scalar @args;
return unless @args;
my @parts;
foreach my $arg ( @args ) {

2
bin/pt-table-checksum
View File

@@ -3529,7 +3529,7 @@ sub join_quote {
sub serialize_list {
my ( $self, @args ) = @_;
PTDEBUG && _d('Serializing', Dumper(\@args));
die "Cannot serialize an empty array" unless scalar @args;
return unless @args;
my @parts;
foreach my $arg ( @args ) {

2
bin/pt-table-sync
View File

@@ -1622,7 +1622,7 @@ sub join_quote {
sub serialize_list {
my ( $self, @args ) = @_;
PTDEBUG && _d('Serializing', Dumper(\@args));
die "Cannot serialize an empty array" unless scalar @args;
return unless @args;
my @parts;
foreach my $arg ( @args ) {

2
bin/pt-table-usage
View File

@@ -5586,7 +5586,7 @@ sub join_quote {
sub serialize_list {
my ( $self, @args ) = @_;
PTDEBUG && _d('Serializing', Dumper(\@args));
die "Cannot serialize an empty array" unless scalar @args;
return unless @args;
my @parts;
foreach my $arg ( @args ) {

2
bin/pt-upgrade
View File

@@ -940,7 +940,7 @@ sub join_quote {
sub serialize_list {
my ( $self, @args ) = @_;
PTDEBUG && _d('Serializing', Dumper(\@args));
die "Cannot serialize an empty array" unless scalar @args;
return unless @args;
my @parts;
foreach my $arg ( @args ) {