~percona-toolkit-dev/percona-toolkit/deltas-27438-pt-table-sync

« back to all changes in this revision

Viewing changes to t/lib/Pingback.t

Merged OptionParser-remove-optional_value & updated modules

Show diffs side-by-side

added added

removed removed

Lines of Context:
510
510
}
511
511
 
512
512
# #############################################################################
 
513
# Check that the --v-c OPT validation works everywhere
 
514
# #############################################################################
 
515
 
 
516
use File::Basename qw(basename);
 
517
 
 
518
my @vc_tools = grep { chomp; basename($_) =~ /\A[a-z-]+\z/ }
 
519
              `grep --files-with-matches Pingback $trunk/bin/*`;
 
520
 
 
521
foreach my $tool ( @vc_tools ) {
 
522
   my $output = `$tool --version-check ftp`;
 
523
   like(
 
524
      $output,
 
525
      qr/\Q* --version-check invalid value ftp.  Accepted values are https, http, auto and off/,
 
526
      "Valid values for v-c are checked in $tool"
 
527
   );
 
528
}
 
529
 
 
530
# #############################################################################
513
531
# Done.
514
532
# #############################################################################
515
533
$sb->wipe_clean($master_dbh) if $master_dbh;