From: Ian Jackson <ijackson@chiark.greenend.org.uk>
Date: Wed, 5 Sep 2018 13:40:47 +0000 (+0100)
Subject: truncation: include header name in warning header
X-Git-Url: http://www.chiark.greenend.org.uk/ucgi/~webstump/git?a=commitdiff_plain;h=8ef141149699a8e07868a9110583763f6c1aa7b0;hp=8f597404afd9b075dc98b134a4734b2b18d065d7;p=modbot-ulm.git

truncation: include header name in warning header

Signed-off-by: Ian Jackson <ijackson@chiark.greenend.org.uk>
---

diff --git a/stump/bin/submission.pl b/stump/bin/submission.pl
index d19c3ba..e1ca104 100755
--- a/stump/bin/submission.pl
+++ b/stump/bin/submission.pl
@@ -355,7 +355,8 @@ sub readMessage {
 	    $_ = substr($_, 0, 500);
 	    $_ =~ s/\n?$/\n/;
 	    $readahead = $_;
-	    $_ = $warning->("Next header truncated!");
+	    m/^[0-9a-z-]+/i;
+	    $_ = $warning->("Next header ($&) truncated!");
 	  }
 	}
       } else {