diff options
author | Ian Jackson <ijackson@chiark.greenend.org.uk> | 2013-08-16 19:42:26 +0100 |
---|---|---|
committer | Ian Jackson <ijackson@chiark.greenend.org.uk> | 2013-08-16 19:42:26 +0100 |
commit | 09174e8172ee86effe190827c24045fd8096d26f (patch) | |
tree | e72ac3d7dd9c5cd7596b1dcceab5a0a4e4ee7314 /dgit | |
parent | 7474327d959d0478a501d9a222876d00384bd7d2 (diff) |
fix later options
Diffstat (limited to 'dgit')
-rwxr-xr-x | dgit | 6 |
1 files changed, 5 insertions, 1 deletions
@@ -576,6 +576,7 @@ sub dopush () { } sub cmd_clone { + parseopts(); my $dstdir; die if defined $package; if (@ARGV==1) { @@ -625,16 +626,19 @@ sub fetchpullargs () { } sub cmd_fetch { + parseopts(); fetchpullargs(); fetch(); } sub cmd_pull { + parseopts(); fetchpullargs(); pull(); } sub cmd_push { + parseopts(); die if defined $package; my $clogp = parsechangelog(); $package = $clogp->{Source}; @@ -656,6 +660,7 @@ sub cmd_push { } sub cmd_build { + # we pass further options and args to git-buildpackage die if defined $package; my $clogp = parsechangelog(); $suite = $clogp->{Distribution}; @@ -713,6 +718,5 @@ sub parseopts () { parseopts(); die unless @ARGV; my $cmd = shift @ARGV; -parseopts(); { no strict qw(refs); &{"cmd_$cmd"}(); } |