diff options
Diffstat (limited to 'dgit')
-rwxr-xr-x | dgit | 12 |
1 files changed, 8 insertions, 4 deletions
@@ -4492,9 +4492,9 @@ END pull(); } -sub cmd_push { +sub prep_push () { parseopts(); - badusage "-p is not allowed with dgit push" if defined $package; + badusage "-p is not allowed with dgit $subcommand" if defined $package; check_not_dirty(); my $clogp = parsechangelog(); $package = getfield $clogp, 'Source'; @@ -4503,7 +4503,7 @@ sub cmd_push { } elsif (@ARGV==1) { ($specsuite) = (@ARGV); } else { - badusage "incorrect arguments to dgit push"; + badusage "incorrect arguments to dgit $subcommand"; } $isuite = getfield $clogp, 'Distribution'; pushing(); @@ -4516,9 +4516,13 @@ sub cmd_push { if (defined $specsuite && $specsuite ne $isuite && $specsuite ne $csuite) { - fail "dgit push: changelog specifies $isuite ($csuite)". + fail "dgit $subcommand: changelog specifies $isuite ($csuite)". " but command line specifies $specsuite"; } +} + +sub cmd_push { + prep_push(); dopush(); } |