watchmaildir: fix check for spam vs ham inbox conflicts

The old check was ineffective since we process the spam folder
config before ham inboxes; and would only fail when attempting
to treat the scalar "watchspam" string as an array ref.

1 files changed, 15 insertions, 0 deletions

diff --git a/t/watch_maildir.t b/t/watch_maildir.t
index 66955072..33a3458b 100644
--- a/t/watch_maildir.t
+++ b/t/watch_maildir.t
@@ -32,6 +32,21 @@ ok(POSIX::mkfifo("$maildir/cur/fifo", 0777),
         'create FIFO to ensure we do not get stuck on it :P');
 my $sem = PublicInbox::Emergency->new($spamdir); # create dirs
 
+{
+        my @w;
+        local $SIG{__WARN__} = sub { push @w, @_ };
+        my $config = PublicInbox::Config->new(\<<EOF);
+$cfgpfx.address=$addr
+$cfgpfx.inboxdir=$git_dir
+$cfgpfx.watch=maildir:$spamdir
+publicinboxlearn.watchspam=maildir:$spamdir
+EOF
+        my $wm = PublicInbox::WatchMaildir->new($config);
+        is(scalar grep(/is a spam folder/, @w), 1, 'got warning about spam');
+        is_deeply($wm->{mdmap}, { "$spamdir/cur" => 'watchspam' },
+                'only got the spam folder to watch');
+}
+
 my $config = PublicInbox::Config->new(\<<EOF);
 $cfgpfx.address=$addr
 $cfgpfx.inboxdir=$git_dir