X-Git-Url: https://www.chiark.greenend.org.uk/ucgi/~ianmdlvl/git?a=blobdiff_plain;ds=sidebyside;f=dgit;h=2069298b906741e9d6f2a93f5afe793ccf5146c4;hb=a9fe4afebac6f0450fa7ed5ff73b8d6d7792fe32;hp=ae75cb9be9a127cc6b2438b544ba4164fcd683f4;hpb=79194f4a7a74b1d6fce6812e379315e0b0984833;p=dgit.git

diff --git a/dgit b/dgit
index ae75cb9b..2069298b 100755
--- a/dgit
+++ b/dgit
@@ -1209,10 +1209,12 @@ our ($dsc_hash,$lastpush_hash);
 
 our $ud = '.git/dgit/unpack';
 
-sub prep_ud () {
-    rmtree($ud);
+sub prep_ud (;$) {
+    my ($d) = @_;
+    $d //= $ud;
+    rmtree($d);
     mkpath '.git/dgit';
-    mkdir $ud or die $!;
+    mkdir $d or die $!;
 }
 
 sub mktree_in_ud_here () {
@@ -1977,6 +1979,7 @@ END
     my $format = getfield $dsc, 'Format';
     printdebug "format $format\n";
     if (madformat($format)) {
+	# user might have not used dgit build, so maybe do this now:
 	commit_quilty_patch();
     }
     check_not_dirty();