1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
|
#!/usr/bin/env perl
#
# Test threading of MH folders.
#
use strict;
use warnings;
use lib qw(. .. tests);
use Tools;
use Test::More tests => 5;
use File::Spec;
use List::Util 'sum';
use Mail::Box::Manager;
my $mhsrc = File::Spec->catfile('folders', 'mh.src');
clean_dir $mhsrc;
unpack_mbox2mh($src, $mhsrc);
my $mgr = new Mail::Box::Manager;
my $folder = $mgr->open
( folder => $mhsrc
, lock_type => 'NONE'
, extract => 'LAZY'
, access => 'rw'
);
my $threads = $mgr->threads(folder => $folder);
cmp_ok($threads->known , "==", 0);
my @all = $threads->sortedAll;
cmp_ok(scalar(@all) , "==", 28);
my $msgs = sum map {$_->numberOfMessages} @all;
cmp_ok($msgs, "==", scalar($folder->messages));
my $out = join '', map {$_->threadToString} @all;
my @lines = split /^/, $out;
cmp_ok(@lines, '==', $folder->messages);
$out = join '', sort @lines;
my $dump = $Mail::Message::crlf_platform ? <<'__DUMP_CRLF' : <<'__DUMP_LF';
1.4K Resize with Transparency
1.3K *- Re: File Conversion From HTML to PS and TIFF
2.1K `--*- Re: File Conversion From HTML to PS and TIFF
2.1K `- Re: File Conversion From HTML to PS and TIFF
1.5K Transparency question
2.5K RE: Transparency question
3.4K RE: Transparency question
5.7K RE: Transparency question
7.4K RE: Transparency question
2.8K RE: jpeg2000 question
1.3K *- Problem resizing images through perl script
843 | `- Re: Problem resizing images through perl script
1.9K | `- RE: Problem resizing images through perl script
1.0K | `- Re: Problem resizing images through perl script
1.2K `- Re: Convert HTM, HTML files to the .jpg format
766 Undefined Symbol: SetWarningHandler
1.1K `- Re: Undefined Symbol: SetWarningHandler
1.9K *- Re: watermarks/embossing
316 Re: Annotate problems (PR#298)
585 `- Re: Annotate problems (PR#298)
1.0K
1.4K `- Re: your mail
2.0K `- Re: your mail
156 Re: your mail
703 `- Re: your mail
194 Re: your mail
2.0K
684 Re: your mail
4.5K `- Re: your mail
569 mailing list archives
1.4K delegates.mgk set-up for unixware printing
1.5K printing solution for UW 7.1
1.5K *- Re: converts new sharpen factors
1.2K New ImageMagick mailing list
28 subscribe
847 Confirmation for subscribe magick-developer
64 `- Re: Confirmation for subscribe magick-developer
11K Welcome to magick-developer
1.7K core dump in simple ImageMagick example
2.2K `- Re: core dump in simple ImageMagick example
908 `- Re: core dump in simple ImageMagick example
770 `- Re: core dump in simple ImageMagick example
2.0K Core Dump on ReadImage
1.0K `- Re: Core Dump on ReadImage
1.6K Font metrics
__DUMP_CRLF
1.3K Resize with Transparency
1.2K *- Re: File Conversion From HTML to PS and TIFF
2.1K `--*- Re: File Conversion From HTML to PS and TIFF
2.1K `- Re: File Conversion From HTML to PS and TIFF
1.4K Transparency question
2.4K RE: Transparency question
3.3K RE: Transparency question
5.5K RE: Transparency question
7.2K RE: Transparency question
2.7K RE: jpeg2000 question
1.2K *- Problem resizing images through perl script
820 | `- Re: Problem resizing images through perl script
1.8K | `- RE: Problem resizing images through perl script
1.0K | `- Re: Problem resizing images through perl script
1.2K `- Re: Convert HTM, HTML files to the .jpg format
747 Undefined Symbol: SetWarningHandler
1.1K `- Re: Undefined Symbol: SetWarningHandler
1.8K *- Re: watermarks/embossing
307 Re: Annotate problems (PR#298)
573 `- Re: Annotate problems (PR#298)
1.0K
1.4K `- Re: your mail
1.9K `- Re: your mail
152 Re: your mail
686 `- Re: your mail
189 Re: your mail
2.0K
670 Re: your mail
4.4K `- Re: your mail
552 mailing list archives
1.4K delegates.mgk set-up for unixware printing
1.5K printing solution for UW 7.1
1.4K *- Re: converts new sharpen factors
1.2K New ImageMagick mailing list
27 subscribe
822 Confirmation for subscribe magick-developer
63 `- Re: Confirmation for subscribe magick-developer
11K Welcome to magick-developer
1.7K core dump in simple ImageMagick example
2.2K `- Re: core dump in simple ImageMagick example
882 `- Re: core dump in simple ImageMagick example
754 `- Re: core dump in simple ImageMagick example
2.0K Core Dump on ReadImage
1.0K `- Re: Core Dump on ReadImage
1.6K Font metrics
__DUMP_LF
$dump = join '', sort split /^/, $dump;
compare_thread_dumps($out, $dump, 'sort thread full dump');
clean_dir $mhsrc;
|
