X-Git-Url: http://www.git.stargrave.org/?a=blobdiff_plain;f=lib%2FPublicInbox%2FWatchMaildir.pm;h=3adebddefe85659aaefef95ea05ed57a4cdf0849;hb=12c3eb5b2b0860292a32d5743ea0157996e9a4b9;hp=f2d3db9519802ec38760d659bb9419e848b3df9d;hpb=1cc19f3f8ffe37e341e219884c6856210ba6fa52;p=public-inbox.git diff --git a/lib/PublicInbox/WatchMaildir.pm b/lib/PublicInbox/WatchMaildir.pm index f2d3db95..3adebdde 100644 --- a/lib/PublicInbox/WatchMaildir.pm +++ b/lib/PublicInbox/WatchMaildir.pm @@ -12,8 +12,6 @@ use PublicInbox::Import; use PublicInbox::MDA; use PublicInbox::Spawn qw(spawn); use File::Temp qw//; -use PublicInbox::MID qw(mids); -use PublicInbox::ContentId qw(content_digest); sub new { my ($class, $config) = @_; @@ -127,7 +125,6 @@ sub _remove_spam { # path must be marked as (S)een $path =~ /:2,[A-R]*S[T-Za-z]*\z/ or return; my $mime = _path_to_mime($path) or return; - _force_mid($mime); $self->{config}->each_inbox(sub { my ($ibx) = @_; eval { @@ -146,16 +143,6 @@ sub _remove_spam { }) } -sub _force_mid { - my ($mime) = @_; - my $hdr = $mime->header_obj; - my $mids = mids($hdr); - return if @$mids; - my $dig = content_digest($mime); - my $mid = $dig->clone->hexdigest . '@localhost'; - $hdr->header_set('Message-Id', $mid); -} - sub _try_path { my ($self, $path) = @_; my @p = split(m!/+!, $path); @@ -191,7 +178,6 @@ sub _try_path { $mime = $ret; } - _force_mid($mime); $im->add($mime, $self->{spamcheck}); }