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); }