learn: scan all inboxes when learning spam

This matches the behavior of the -watch daemon since
6d534038285ddd760709ba76ea007f9108200097
("watch: watchspam affects all configured inboxes")

diff --git a/script/public-inbox-learn b/script/public-inbox-learn
index 38c83243f8971e63859fe4261b7ba4d521ff2335..71aa50f9d5989b093b4efa50f4312267f8ce6440 100755 (executable)
--- a/script/public-inbox-learn
+++ b/script/public-inbox-learn
@@ -51,6 +51,18 @@ foreach my $h (qw(Cc To)) {
        }
 }
 
+if ($train eq 'spam') {
+       $pi_config->each_inbox(sub {
+               my ($ibx) = @_;
+               my $git = $ibx->git;
+               my $name = $ibx->{name};
+               my $addr = $ibx->{-primary_address};
+               my $im = PublicInbox::Import->new($git, $name, $addr, $ibx);
+               $im->remove($mime);
+               $im->done;
+       });
+}
+
 require PublicInbox::MDA if $train eq "ham";
 
 # n.b. message may be cross-posted to multiple public-inboxes