lib/PublicInbox/Import.pm | 10 ++++++----

diff --git a/lib/PublicInbox/Import.pm b/lib/PublicInbox/Import.pm
index 1a226cc78dd4e45a429c8f026137251373ff5a8c..2cb4896af5a83a08ca45cb7340f5c1e548ed1e42 100644
--- a/lib/PublicInbox/Import.pm
+++ b/lib/PublicInbox/Import.pm
@@ -328,11 +328,13 @@ 	("$name <$email>", $at, $ct, $subject);
 }
 
 # kill potentially confusing/misleading headers
+our @UNWANTED_HEADERS = (qw(Bytes Lines Content-Length),
+			qw(Status X-Status));
 sub drop_unwanted_headers ($) {
-	my ($mime) = @_;
-
-	$mime->header_set($_) for qw(Bytes Lines Content-Length Status);
-	$mime->header_set($_) for @PublicInbox::MDA::BAD_HEADERS;
+	my ($eml) = @_;
+	for (@UNWANTED_HEADERS, @PublicInbox::MDA::BAD_HEADERS) {
+		$eml->header_set($_);
+	}
 }
 
 # used by V2Writable, too