← Back to branch summary

~percona-toolkit-dev/percona-toolkit/ptc-errors-on-slave-with-different-time-zone-1388870

« back to all changes in this revision

Viewing changes to bin/pt-fk-error-logger

Merge fix-pt-archiver-dry-run-bug-1199589 and make 2.2.4 release dates in Changelog and release_notes.pod match.

Show diffs side-by-side

added added

removed removed

Lines of Context:
bin/pt-fk-error-logger
503
503
   my $long = exists $self->{opts}->{$opt}       ? $opt
504
504
            : exists $self->{short_opts}->{$opt} ? $self->{short_opts}->{$opt}
505
505
            : die "Getopt::Long gave a nonexistent option: $opt";
506
 
 
507
506
   $opt = $self->{opts}->{$long};
508
507
   if ( $opt->{is_cumulative} ) {
509
508
      $opt->{value}++;
510
509
   }
 
510
   elsif ( ($opt->{type} || '') eq 's' && $val =~ m/^--?(.+)/ ) {
 
511
      my $next_opt = $1;
 
512
      if (    exists $self->{opts}->{$next_opt}
 
513
           || exists $self->{short_opts}->{$next_opt} ) {
 
514
         $self->save_error("--$long requires a string value");
 
515
         return;
 
516
      }
 
517
      else {
 
518
         $opt->{value} = $val;
 
519
      }
 
520
   }
511
521
   else {
512
522
      $opt->{value} = $val;
513
523
   }
4516
4526
 
4517
4527
=head1 VERSION
4518
4528
 
4519
 
pt-fk-error-logger 2.2.3
 
4529
pt-fk-error-logger 2.2.4
4520
4530
 
4521
4531
=cut