[PATCH] public-inbox-{learn,mda}: automatically sync index

[Eric Wong <e@80x24.org>]

We'll ignore errors, for now, but should eventually warn or
log.
---
 public-inbox-learn |  9 +++++++++
 public-inbox-mda   | 12 ++++++++++++
 2 files changed, 21 insertions(+)

diff --git a/public-inbox-learn b/public-inbox-learn
index d3a05ab..9576a55 100755
--- a/public-inbox-learn
+++ b/public-inbox-learn
@@ -76,5 +76,14 @@ foreach my $recipient (keys %dests) {
 	if (!run([qw(spamc -L), $train], \$in, @output)) {
 		$err = 1;
 	}
+
+	$err or eval {
+		require PublicInbox::Search;
+		require PublicInbox::GitCatFile;
+		my $git = PublicInbox::GitCatFile->new($git_dir);
+		my $s = PublicInbox::Search->new($git_dir, 1);
+		$s->index_sync($git);
+	};
 }
+
 exit $err;
diff --git a/public-inbox-mda b/public-inbox-mda
index 4348cb2..a5b9cf8 100755
--- a/public-inbox-mda
+++ b/public-inbox-mda
@@ -54,6 +54,7 @@ if (PublicInbox::MDA->precheck($filter, $dst->{address}) &&
 			local $ENV{GIT_COMMITTER_NAME} = $dst->{listname};
 
 			$filter->pipe(PublicInbox::MDA->cmd, $main_repo);
+			search_index_sync($main_repo);
 		}
 	}
 } else {
@@ -79,3 +80,14 @@ sub do_spamc {
 
 	return ($@ || $? || !defined($$out) || length($$out) == 0) ? 0 : 1;
 }
+
+sub search_index_sync {
+	my ($git_dir) = @_;
+	eval {
+		require PublicInbox::Search;
+		require PublicInbox::GitCatFile;
+		my $git = PublicInbox::GitCatFile->new($git_dir);
+		my $s = PublicInbox::Search->new($git_dir, 1);
+		$s->index_sync($git);
+	};
+}
-- 
EW