Quilt mode reporting: Only print warning about quilt once

1 files changed, 6 insertions, 2 deletions

diff --git a/dgit b/dgit
index 8404a19..0cdf0bd 100755
--- a/dgit
+++ b/dgit
@@ -1850,11 +1850,15 @@ sub get_source_format () {
 sub madformat ($) {
     my ($format) = @_;
     return 0 unless $format eq '3.0 (quilt)';
+    our $quilt_mode_warned;
     if ($quilt_mode eq 'nocheck') {
-	progress "Not doing any fixup of \`$format' due to --no-quilt-fixup";
+	progress "Not doing any fixup of \`$format' due to".
+	    " ----no-quilt-fixup or --quilt=nocheck"
+	    unless $quilt_mode_warned++;
 	return 0;
     }
-    progress "Format \`$format', checking/updating patch stack";
+    progress "Format \`$format', need to check/update patch stack"
+	unless $quilt_mode_warned++;
     return 1;
 }