mda: hoist out List-ID handling and reuse in -learn

[public-inbox.git] / script / public-inbox-mda

diff --git a/script/public-inbox-mda b/script/public-inbox-mda
index 9b8753da1877d320bc4fb0f2d32a6d0f208f3066..3ff318c916007f2f19751b51a241ecb22fca2819 100755 (executable)
--- a/script/public-inbox-mda
+++ b/script/public-inbox-mda
@@ -43,16 +43,13 @@ if (defined $recipient) {
        $dst = $config->lookup($recipient); # first check
 }
 if (!defined $dst) {
-       my $list_id = $simple->header('List-Id');
-       if (defined $list_id && $list_id =~ /<[ \t]*(.+)?[ \t]*>/) {
-               $dst = $config->lookup_list_id($1);
-       }
+       $dst = PublicInbox::MDA->inbox_for_list_id($config, $simple);
        if (!defined $dst && !defined $recipient) {
                die "ORIGINAL_RECIPIENT not defined in ENV\n";
        }
        defined $dst or do_exit(67); # EX_NOUSER 5.1.1 user unknown
 }
-$dst->{mainrepo} or do_exit(67);
+$dst->{inboxdir} or do_exit(67);
 $dst = PublicInbox::InboxWritable->new($dst);
 
 # pre-check, MDA has stricter rules than an importer might;