chiark / gitweb /
fix later options
authorIan Jackson <ijackson@chiark.greenend.org.uk>
Fri, 16 Aug 2013 18:42:26 +0000 (19:42 +0100)
committerIan Jackson <ijackson@chiark.greenend.org.uk>
Fri, 16 Aug 2013 18:42:26 +0000 (19:42 +0100)
dgit

diff --git a/dgit b/dgit
index 1fd15d73ae63bedd54959abf82401310a3b1f8a6..d4a091056331d2041e4a566d0f85e8b5fffb5a8f 100755 (executable)
--- a/dgit
+++ b/dgit
@@ -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"}(); }