isync

mailbox synchronization program
git clone https://git.code.sf.net/p/isync/isync
Log | Files | Refs | README | LICENSE

commit b59ee239a4b7caa956c3912f2514318d4be333b8
parent 50eab085091b06ce948a837206ee8a368738a97c
Author: Oswald Buddenhagen <ossi@users.sf.net>
Date:   Fri,  3 Apr 2020 11:21:09 +0200

autotest: assume that each message has a UID

followup to 7ce658d14.

Diffstat:
Msrc/run-tests.pl | 9+--------
1 file changed, 1 insertion(+), 8 deletions(-)

diff --git a/src/run-tests.pl b/src/run-tests.pl @@ -329,8 +329,6 @@ sub readbox($) my ($uid, $flg, $num); if ($f =~ /^\d+\.\d+_\d+\.[-[:alnum:]]+,U=(\d+):2,(.*)$/) { ($uid, $flg) = ($1, $2); - } elsif ($f =~ /^\d+\.\d+_(\d+)\.[-[:alnum:]]+:2,(.*)$/) { - ($uid, $flg) = (0, $2); } else { print STDERR "unrecognided file name '$f' in '$bn'.\n"; exit 1; @@ -453,13 +451,8 @@ sub mkbox($$@) close FILE; while (@ms) { my ($num, $uid, $flg) = (shift @ms, shift @ms, shift @ms); - if ($uid) { - $uid = ",U=".$uid; - } else { - $uid = ""; - } my $big = $flg =~ s/\*//; - open(FILE, ">", $bn."/".($flg =~ /S/ ? "cur" : "new")."/0.1_".$num.".local".$uid.":2,".$flg) or + open(FILE, ">", $bn."/".($flg =~ /S/ ? "cur" : "new")."/0.1_".$num.".local,U=".$uid.":2,".$flg) or die "Cannot create message $num in mailbox $bn.\n"; print FILE "From: foo\nTo: bar\nDate: Thu, 1 Jan 1970 00:00:00 +0000\nSubject: $num\n\n".(("A"x50)."\n")x($big*30); close FILE;