#!/usr/bin/perl -w
-# Copyright (C) 2013, Eric Wong <normalperson@yhbt.net> and all contributors
+# Copyright (C) 2013-2015 all contributors <meta@public-inbox.org>
# License: AGPLv3 or later (https://www.gnu.org/licenses/agpl-3.0.txt)
use strict;
use warnings;
} else {
# Ensure emergency spam gets spamassassin headers.
# This makes it easier to prioritize obvious spam from less obvious
- if (defined($filtered) && length($filtered)) {
+ if (defined($filtered) && $filtered ne '') {
my $drop = Email::MIME->new(\$filtered);
$filtered = undef;
$filter->simple($drop);
run([qw/spamc -E --headers/], \$orig, $out);
};
- return ($@ || $? || !defined($$out) || length($$out) == 0) ? 0 : 1;
+ return ($@ || $? || !defined($$out) || $$out eq '') ? 0 : 1;
}
sub search_index_sync {
my ($git_dir) = @_;
eval {
- require PublicInbox::Search;
- umask 0022; # XXX FIXME use git config core.sharedRepository
- my $s = PublicInbox::SearchIdx->new($git_dir, 2);
- $s->index_sync;
+ require PublicInbox::SearchIdx;
+ PublicInbox::SearchIdx->new($git_dir, 2)->index_sync;
};
}