summaryrefslogtreecommitdiff
path: root/dgit
diff options
context:
space:
mode:
authorIan Jackson <ijackson@chiark.greenend.org.uk>2015-08-14 12:13:49 +0100
committerIan Jackson <ijackson@chiark.greenend.org.uk>2015-08-14 18:34:57 +0100
commit53849d5fc76b4c7ee502129cc045c042f42eb8aa (patch)
tree356e0773cf5f47d13cda1d78b518d4c2bfd7261d /dgit
parent268c7b9f82a0333f0de7ec09f3261e84deb8fb7b (diff)
Do defaulting for $cleanmode just before invoking main $fn->() (nfc)
Diffstat (limited to 'dgit')
-rwxr-xr-xdgit4
1 files changed, 3 insertions, 1 deletions
diff --git a/dgit b/dgit
index d7d27f8..bde052e 100755
--- a/dgit
+++ b/dgit
@@ -57,7 +57,7 @@ our $rmonerror = 1;
our @deliberatelies;
our %previously;
our $existing_package = 'dpkg';
-our $cleanmode = 'dpkg-source';
+our $cleanmode;
our $changes_since_version;
our $quilt_mode;
our $quilt_modes_re = 'linear|smash|auto|nofix|nocheck';
@@ -3312,6 +3312,8 @@ if (!defined $quilt_mode) {
$quilt_mode = $1;
}
+$cleanmode //= 'dpkg-source';
+
my $fn = ${*::}{"cmd_$cmd"};
$fn or badusage "unknown operation $cmd";
$fn->();