autotest: re-order mailbox contents according to UIDs
... instead of subjects, because that's way more natural and thus less confusing.
This commit is contained in:
parent
f3629c69e1
commit
6734b9ce7d
|
@ -57,7 +57,7 @@ my @X01 = (
|
||||||
[ 10,
|
[ 10,
|
||||||
1, 1, "F", 2, 2, "F", 3, 3, "FS", 4, 4, "", 5, 5, "T", 6, 6, "FT", 7, 7, "FT", 9, 9, "", 10, 10, "" ],
|
1, 1, "F", 2, 2, "F", 3, 3, "FS", 4, 4, "", 5, 5, "T", 6, 6, "FT", 7, 7, "FT", 9, 9, "", 10, 10, "" ],
|
||||||
[ 10,
|
[ 10,
|
||||||
1, 1, "F", 2, 2, "F", 3, 3, "FS", 4, 4, "", 5, 5, "T", 7, 7, "FT", 8, 8, "T", 9, 10, "", 10, 9, "" ],
|
1, 1, "F", 2, 2, "F", 3, 3, "FS", 4, 4, "", 5, 5, "T", 7, 7, "FT", 8, 8, "T", 10, 9, "", 9, 10, "" ],
|
||||||
[ 9, 0, 9,
|
[ 9, 0, 9,
|
||||||
1, 1, "F", 2, 2, "F", 3, 3, "FS", 4, 4, "", 5, 5, "T", 6, 0, "", 7, 7, "FT", 0, 8, "", 10, 9, "", 9, 10, "" ],
|
1, 1, "F", 2, 2, "F", 3, 3, "FS", 4, 4, "", 5, 5, "T", 6, 0, "", 7, 7, "FT", 0, 8, "", 10, 9, "", 9, 10, "" ],
|
||||||
);
|
);
|
||||||
|
@ -69,7 +69,7 @@ my @X02 = (
|
||||||
[ 10,
|
[ 10,
|
||||||
1, 1, "F", 2, 2, "F", 3, 3, "FS", 4, 4, "", 9, 9, "", 10, 10, "" ],
|
1, 1, "F", 2, 2, "F", 3, 3, "FS", 4, 4, "", 9, 9, "", 10, 10, "" ],
|
||||||
[ 10,
|
[ 10,
|
||||||
1, 1, "F", 2, 2, "F", 3, 3, "FS", 4, 4, "", 9, 10, "", 10, 9, "" ],
|
1, 1, "F", 2, 2, "F", 3, 3, "FS", 4, 4, "", 10, 9, "", 9, 10, "" ],
|
||||||
[ 9, 0, 9,
|
[ 9, 0, 9,
|
||||||
1, 1, "F", 2, 2, "F", 3, 3, "FS", 4, 4, "", 10, 9, "", 9, 10, "" ],
|
1, 1, "F", 2, 2, "F", 3, 3, "FS", 4, 4, "", 10, 9, "", 9, 10, "" ],
|
||||||
);
|
);
|
||||||
|
@ -81,7 +81,7 @@ my @X03 = (
|
||||||
[ 10,
|
[ 10,
|
||||||
1, 1, "F", 2, 2, "F", 3, 3, "FS", 4, 4, "", 5, 5, "T", 6, 6, "FT", 7, 7, "FT", 9, 9, "", 10, 10, "" ],
|
1, 1, "F", 2, 2, "F", 3, 3, "FS", 4, 4, "", 5, 5, "T", 6, 6, "FT", 7, 7, "FT", 9, 9, "", 10, 10, "" ],
|
||||||
[ 10,
|
[ 10,
|
||||||
1, 1, "F", 2, 2, "F", 3, 3, "FS", 4, 4, "", 9, 10, "", 10, 9, "" ],
|
1, 1, "F", 2, 2, "F", 3, 3, "FS", 4, 4, "", 10, 9, "", 9, 10, "" ],
|
||||||
[ 9, 0, 9,
|
[ 9, 0, 9,
|
||||||
1, 1, "F", 2, 2, "F", 3, 3, "FS", 4, 4, "", 5, 0, "T", 6, 0, "", 7, 0, "T", 10, 9, "", 9, 10, "" ],
|
1, 1, "F", 2, 2, "F", 3, 3, "FS", 4, 4, "", 5, 0, "T", 6, 0, "", 7, 0, "T", 10, 9, "", 9, 10, "" ],
|
||||||
);
|
);
|
||||||
|
@ -93,7 +93,7 @@ my @X04 = (
|
||||||
[ 9,
|
[ 9,
|
||||||
1, 1, "F", 2, 2, "", 3, 3, "FS", 4, 4, "", 5, 5, "T", 6, 6, "F", 7, 7, "FT", 9, 9, "" ],
|
1, 1, "F", 2, 2, "", 3, 3, "FS", 4, 4, "", 5, 5, "T", 6, 6, "F", 7, 7, "FT", 9, 9, "" ],
|
||||||
[ 10,
|
[ 10,
|
||||||
1, 1, "F", 2, 2, "F", 3, 3, "FS", 4, 4, "", 5, 5, "T", 7, 7, "FT", 8, 8, "T", 9, 10, "", 10, 9, "" ],
|
1, 1, "F", 2, 2, "F", 3, 3, "FS", 4, 4, "", 5, 5, "T", 7, 7, "FT", 8, 8, "T", 10, 9, "", 9, 10, "" ],
|
||||||
[ 9, 0, 0,
|
[ 9, 0, 0,
|
||||||
1, 1, "F", 2, 2, "", 3, 3, "FS", 4, 4, "", 5, 5, "T", 6, 6, "", 7, 7, "FT", 0, 8, "", 9, 10, "" ],
|
1, 1, "F", 2, 2, "", 3, 3, "FS", 4, 4, "", 5, 5, "T", 6, 6, "", 7, 7, "FT", 0, 8, "", 9, 10, "" ],
|
||||||
);
|
);
|
||||||
|
@ -129,7 +129,7 @@ my @X07 = (
|
||||||
[ 10,
|
[ 10,
|
||||||
1, 1, "F", 2, 2, "", 3, 3, "FS", 4, 4, "", 5, 5, "T", 6, 6, "F", 7, 7, "FT", 9, 9, "", 10, 10, "" ],
|
1, 1, "F", 2, 2, "", 3, 3, "FS", 4, 4, "", 5, 5, "T", 6, 6, "F", 7, 7, "FT", 9, 9, "", 10, 10, "" ],
|
||||||
[ 10,
|
[ 10,
|
||||||
1, 1, "", 2, 2, "F", 3, 3, "F", 4, 4, "", 5, 5, "", 7, 7, "", 8, 8, "", 9, 10, "", 10, 9, "" ],
|
1, 1, "", 2, 2, "F", 3, 3, "F", 4, 4, "", 5, 5, "", 7, 7, "", 8, 8, "", 10, 9, "", 9, 10, "" ],
|
||||||
[ 9, 0, 9,
|
[ 9, 0, 9,
|
||||||
1, 1, "", 2, 2, "", 3, 3, "", 4, 4, "", 5, 5, "", 6, 6, "", 7, 7, "", 8, 8, "", 10, 9, "", 9, 10, "" ],
|
1, 1, "", 2, 2, "", 3, 3, "", 4, 4, "", 5, 5, "", 6, 6, "", 7, 7, "", 8, 8, "", 10, 9, "", 9, 10, "" ],
|
||||||
);
|
);
|
||||||
|
@ -360,7 +360,7 @@ sub showbox($)
|
||||||
|
|
||||||
my ($mu, %ms) = readbox($bn);
|
my ($mu, %ms) = readbox($bn);
|
||||||
my @MS = ($mu);
|
my @MS = ($mu);
|
||||||
for my $uid (sort { $ms{$a}[0] <=> $ms{$b}[0] } keys %ms) {
|
for my $uid (sort { $a <=> $b } keys %ms) {
|
||||||
push @MS, $ms{$uid}[0], $uid, $ms{$uid}[1];
|
push @MS, $ms{$uid}[0], $uid, $ms{$uid}[1];
|
||||||
}
|
}
|
||||||
printbox($bn, @MS);
|
printbox($bn, @MS);
|
||||||
|
|
Loading…
Reference in New Issue
Block a user