#!/usr/bin/perl -w
-# Copyright (C) 2014, Eric Wong <normalperson@yhbt.net> and all contributors
+# Copyright (C) 2014-2015 all contributors <meta@public-inbox.org>
# License: AGPLv3 or later (https://www.gnu.org/licenses/agpl-3.0.txt)
+#
+# Used for training spam (via SpamAssassin) and removing messages from a
+# public-inbox
my $usage = "$0 (spam|ham) < /path/to/message";
use strict;
use warnings;
}
$err or eval {
- require PublicInbox::Search;
- umask 0022; # XXX FIXME use git config core.sharedRepository
- my $s = PublicInbox::Search->new($git_dir, 2);
- $s->index_sync;
+ require PublicInbox::SearchIdx;
+ PublicInbox::SearchIdx->new($git_dir, 2)->index_sync;
};
}