X-Git-Url: http://www.git.stargrave.org/?a=blobdiff_plain;f=t%2Flei_mail_sync.t;fp=t%2Flei_mail_sync.t;h=f0605092fa6e70f40b187e36d269f0e245d3a6b5;hb=473b069c61b3d4936e2c5ed46fd7d348c9f6d1b7;hp=864d6e48f48d4dafefaf7dab94e39ab899c8f864;hpb=aa6ad348fea8a7affb1ecf025c297983d0e061cd;p=public-inbox.git diff --git a/t/lei_mail_sync.t b/t/lei_mail_sync.t index 864d6e48..f0605092 100644 --- a/t/lei_mail_sync.t +++ b/t/lei_mail_sync.t @@ -37,6 +37,18 @@ is_deeply($ro->locations_for('deadbeef'), { $imap => [ 1 ], $maildir => [ $fname ] }, 'locations_for w/ maildir + imap'); +if ('mess things up pretend old bug') { + $lms->lms_begin; + $lms->{dbh}->do('UPDATE folders SET loc = ? WHERE loc = ?', undef, + "$maildir/", $maildir); + ok(delete $lms->{fmap}, 'clear folder map'); + $lms->lms_commit; + + $lms->lms_begin; + ok($lms->set_src('deadbeef', $maildir, \$fname), 'set Maildir once'); + $lms->lms_commit; +}; + is_deeply([sort($ro->folders)], [$imap, $maildir], 'both folders shown'); my @res; $ro->each_src($maildir, sub {