Browse Source

add expiration tests

wip/maildir-uid-dupes-test
Oswald Buddenhagen 19 years ago
parent
commit
716ff82540
  1. 59
      src/run-tests.pl

59
src/run-tests.pl

@ -157,6 +157,65 @@ my @X22 = (
); );
test(\@x20, \@X22); test(\@x20, \@X22);
# expiration tests
my @x30 = (
[ 0,
1, 0, "F", 2, 0, "", 3, 0, "", 4, 0, "", 5, 0, "" ],
[ 0,
],
[ 0, 0, 0,
],
);
#show("30", "31", "", "", "MaxMessages 3\n");
my @X31 = (
[ "", "", "MaxMessages 3\n" ],
[ 5,
1, 1, "F", 2, 2, "", 3, 3, "", 4, 4, "", 5, 5, "" ],
[ 5,
1, 1, "F", 2, 2, "", 3, 3, "", 4, 4, "", 5, 5, "" ],
[ 5, 0, 0,
1, 1, "F", 2, 2, "", 3, 3, "", 4, 4, "", 5, 5, "" ],
);
test(\@x30, \@X31);
my @x40 = @X31[1,2,3];
#show("40", "41", "", "", "MaxMessages 3\nExpunge Both\n");
my @X41 = (
[ "", "", "MaxMessages 3\nExpunge Both\n" ],
[ 5,
1, 1, "F", 2, 2, "", 3, 3, "", 4, 4, "", 5, 5, "" ],
[ 5,
1, 1, "F", 3, 3, "", 4, 4, "", 5, 5, "" ],
[ 5, 2, 0,
1, 1, "F", 3, 3, "", 4, 4, "", 5, 5, "" ],
);
test(\@x40, \@X41);
my @x50 = (
[ 5,
1, 1, "F", 2, 2, "F", 3, 3, "", 4, 4, "", 5, 5, "" ],
[ 5,
1, 1, " ", 2, 2, "T", 3, 3, "", 4, 4, "", 5, 5, "" ],
[ 5, 2, 0,
1, 1, "F", 2, 2, "X", 3, 3, "", 4, 4, "", 5, 5, "" ],
);
#show("50", "51", "", "", "MaxMessages 3\nExpunge Both\n");
my @X51 = (
[ "", "", "MaxMessages 3\nExpunge Both\n" ],
[ 5,
1, 1, "", 2, 2, "F", 3, 3, "", 4, 4, "", 5, 5, "" ],
[ 5,
2, 2, "F", 3, 3, "", 4, 4, "", 5, 5, "" ],
[ 5, 2, 0,
2, 2, "F", 3, 3, "", 4, 4, "", 5, 5, "" ],
);
test(\@x50, \@X51);
################################################################################ ################################################################################
chdir ".."; chdir "..";

Loading…
Cancel
Save