Reject (rather than ignoring) further options merged witht -wn, -wg, -wd.

[dgit.git] / dgit

diff --git a/dgit b/dgit
index 839f93ffe04b34509e6b4131979e231eb65ca3aa..7cbef4e75fb218d2e55a69fa3e1e8ff76c535c3e 100755 (executable)
--- a/dgit
+++ b/dgit
@@ -2732,13 +2732,13 @@ sub parseopts () {
                } elsif (m/^-[vdCk]$/) {
                    badusage
  "option \`$_' requires an argument (and no space before the argument)";
                } elsif (m/^-[vdCk]$/) {
                    badusage
  "option \`$_' requires an argument (and no space before the argument)";

-               } elsif (s/^-wn//s) {
+               } elsif (s/^-wn$//s) {

                    push @ropts, $&;
                    $cleanmode = 'none';
                    push @ropts, $&;
                    $cleanmode = 'none';

-               } elsif (s/^-wg//s) {
+               } elsif (s/^-wg$//s) {

                    push @ropts, $&;
                    $cleanmode = 'git';
                    push @ropts, $&;
                    $cleanmode = 'git';

-               } elsif (s/^-wd//s) {
+               } elsif (s/^-wd$//s) {

                    push @ropts, $&;
                    $cleanmode = 'dpkg-source';
                } else {
                    push @ropts, $&;
                    $cleanmode = 'dpkg-source';
                } else {