X-Git-Url: http://www.git.stargrave.org/?a=blobdiff_plain;f=lib%2FPublicInbox%2FWatchMaildir.pm;h=8588f16c836a449366c0be375fea745c3c1651ed;hb=9b80f2bedbe5a8a9154dfa0ba3c7e63012287bea;hp=985f9192078f3497de62e6da5691f706579ef90a;hpb=5d39caaf83799ba3a94b73463a3597c181816425;p=public-inbox.git diff --git a/lib/PublicInbox/WatchMaildir.pm b/lib/PublicInbox/WatchMaildir.pm index 985f9192..8588f16c 100644 --- a/lib/PublicInbox/WatchMaildir.pm +++ b/lib/PublicInbox/WatchMaildir.pm @@ -111,7 +111,10 @@ sub _remove_spam { $im->remove($scrubbed); } }; - warn "error removing spam at $path from $ibx->{name}\n" if $@; + if ($@) { + warn "error removing spam at: ", $path, + " from ", $ibx->{name}, ': ', $@, "\n"; + } }) } @@ -239,7 +242,7 @@ sub _scrubber_for { my ($inbox) = @_; my $f = $inbox->{filter}; if ($f && $f =~ /::/) { - my @args; + my @args = (-inbox => $inbox); # basic line splitting, only # Perhaps we can have proper quote splitting one day... ($f, @args) = split(/\s+/, $f) if $f =~ /\s+/;