X-Git-Url: http://www.git.stargrave.org/?a=blobdiff_plain;f=lib%2FPublicInbox%2FWatchMaildir.pm;h=a76bf06e629db1c5b5381ee04e038fd48b970790;hb=2b2a247c6cec99784e3e92bb025555c93f5701f3;hp=2d4c6f4340af5d34b01148be0878743be52fc5eb;hpb=36c3b27458e722e3e9e1cb378cee16d40469b1d0;p=public-inbox.git

diff --git a/lib/PublicInbox/WatchMaildir.pm b/lib/PublicInbox/WatchMaildir.pm
index 2d4c6f43..a76bf06e 100644
--- a/lib/PublicInbox/WatchMaildir.pm
+++ b/lib/PublicInbox/WatchMaildir.pm
@@ -150,6 +150,12 @@ sub _try_path {
 	if (!ref($inboxes) && $inboxes eq 'watchspam') {
 		return _remove_spam($self, $path);
 	}
+
+	my $warn_cb = $SIG{__WARN__} || sub { print STDERR @_ };
+	local $SIG{__WARN__} = sub {
+		$warn_cb->("path: $path\n");
+		$warn_cb->(@_);
+	};
 	foreach my $ibx (@$inboxes) {
 		my $mime = _path_to_mime($path) or next;
 		my $im = _importer_for($self, $ibx);