|
@@ -616,8 +616,18 @@ sub test($$)
|
|
|
die "Cannot read journal.\n";
|
|
|
my @nj = <FILE>;
|
|
|
close FILE;
|
|
|
- @ret = runsync("-0 --no-expunge");
|
|
|
+ ($xc, @ret) = runsync("-0 --no-expunge");
|
|
|
killcfg();
|
|
|
+ if ($xc) {
|
|
|
+ print "Journal replay failed.\n";
|
|
|
+ print "Input == Expected result:\n";
|
|
|
+ printchan($$tx[1], $$tx[2], @{ $$tx[3] });
|
|
|
+ print "Options:\n";
|
|
|
+ print " [ ".join(", ", map('"'.qm($_).'"', @{ $$tx[0] }))." ], [ \"-0\", \"--no-expunge\" ]\n";
|
|
|
+ print "Debug output:\n";
|
|
|
+ print @ret;
|
|
|
+ exit 1;
|
|
|
+ }
|
|
|
if (ckstate("slave/.mbsyncstate", @{ $$tx[3] })) {
|
|
|
print "Options:\n";
|
|
|
print " [ ".join(", ", map('"'.qm($_).'"', @{ $$tx[0] }))." ]\n";
|