cyrus-imapd/patch-cassandane-extra-logging
2018-04-11 13:18:05 -05:00

21 lines
727 B
Plaintext

diff --git a/Cassandane/Instance.pm b/Cassandane/Instance.pm
index 6c6daf7..91f1ca2 100644
--- a/Cassandane/Instance.pm
+++ b/Cassandane/Instance.pm
@@ -274,6 +274,7 @@ sub _make_unique_instance_info
die "Invalid TEST_UNIT_WORKER_ID - code not run in Worker context"
if (defined($workerid) && $workerid eq 'invalid');
$stamp .= chr(64 + $workerid) if defined $workerid;
+ xlog "workerid: $workerid, stamp: $stamp"
}
my $rootdir = _rootdir();
@@ -285,6 +286,7 @@ sub _make_unique_instance_info
$name = $stamp . $next_unique;
$next_unique++;
$basedir = "$rootdir/$name";
+ xlog "name: $name, basedir: $basedir";
last if mkdir($basedir);
die "Cannot create $basedir: $!" if ($! != EEXIST);
}