improve diagnostics adding the name of the lockdirectory we are waiting for
authorAndreas J. Koenig <andk@cpan.org>
Sat, 4 Jun 2011 11:26:44 +0000 (4 13:26 +0200)
committerAndreas J. Koenig <andk@cpan.org>
Sat, 4 Jun 2011 11:26:44 +0000 (4 13:26 +0200)
lib/File/Rsync/Mirror/Recent.pm

index 91989d7..2aae878 100644 (file)
@@ -857,7 +857,7 @@ sub _rmirror_runstatusfile_write {
     my $start = time;
     while (not mkdir "$file.lock") {
         Time::HiRes::sleep 0.15;
-        warn "*** waiting for lock ***" if time - $start >= 3;
+        warn "*** waiting for lock directory '$file.lock' ***" if time - $start >= 3;
     }
     YAML::Syck::DumpFile
           (