index: warn with info about the message as context

This can help users track down the source of warnings
when presented with imperfect emails.

While we're at it, make the __WARN__ callback in t/v2writable.t
a no-op since we don't check for warnings, there.

1 files changed, 1 insertions, 2 deletions

diff --git a/t/v2writable.t b/t/v2writable.t
index f1714175..2826513b 100644
--- a/t/v2writable.t
+++ b/t/v2writable.t
@@ -253,10 +253,9 @@ EOF
 }
 
 {
-        my @warn;
         my $x = 'x'x250;
         my $y = 'y'x250;
-        local $SIG{__WARN__} = sub { push @warn, @_ };
+        local $SIG{__WARN__} = sub {};
         $mime->header_set('Subject', 'long mid');
         $mime->header_set('Message-ID', "<$x>");
         ok($im->add($mime), 'add excessively long Message-ID');