Allow --auto-cmd (-a) to be repeated.
authorWayne Davison <wayned@samba.org>
Wed, 8 Feb 2006 17:40:26 +0000 (17:40 +0000)
committerWayne Davison <wayned@samba.org>
Wed, 8 Feb 2006 17:40:26 +0000 (17:40 +0000)
verify-patches

index f08f198..4f0eaa7 100755 (executable)
@@ -6,7 +6,7 @@ use Getopt::Long;
 my @generated_files = qw( proto.h configure config.h.in rsync.1 rsyncd.conf.5 );
 
 my($no_cvs, $failures_only, $minor_updates, $prepare_source, $require_quit);
-my $auto_cmd = 'never';
+my $auto_cmd = 'none';
 
 &Getopt::Long::Configure('bundling');
 GetOptions(
@@ -15,9 +15,10 @@ GetOptions(
     'minor-updates|u' => \$minor_updates,
     'prepare-source|p' => \$prepare_source,
     'require-quit|Q' => \$require_quit,
-    'auto-cmd|a=s' => \$auto_cmd,
+    'auto-cmd|a=s' => sub { $auto_cmd .= "|$_[1]" },
 ) or &usage;
 
+$auto_cmd =~ s/none\|//;
 $auto_cmd = qr/^($auto_cmd)$/i;
 
 my $interesting_fuzz = $minor_updates ? '\d' : '[2-9]';