Package: libdpkg-perl
Version: 1.16.10
A co-worker got the following error while building a package:
dpkg-gencontrol: warning: File::FcntlLock not available; using flock which is
not NFS-safe
Undefined subroutine &main::_ called at /usr/share/perl5/Dpkg/File.pm line 41.
Apparently, in this situation the build was being done in a filesystem
where flock() fails to lock. I believe libdpkg-perl was unable to
report the real error properly because it is translating the error
message using nonexistent subroutine "_". I assume it should be using
"_g" instead:
--- a/scripts/Dpkg/File.pm
+++ b/scripts/Dpkg/File.pm
@@ -39,12 +39,12 @@ sub file_lock($$) {
if ($@) {
warning(_g("File::FcntlLock not available; using flock which is not
NFS-safe"));
flock($fh, LOCK_EX) ||
- syserr(_("failed to get a write lock on %s"), $filename);
+ syserr(_g("failed to get a write lock on %s"), $filename);
} else {
eval q{
my $fs = File::FcntlLock->new(l_type => F_WRLCK);
$fs->lock($fh, F_SETLKW) ||
- syserr(_("failed to get a write lock on %s"), $filename);
+ syserr(_g("failed to get a write lock on %s"), $filename);
}
}
}
--
To UNSUBSCRIBE, email to [email protected]
with a subject of "unsubscribe". Trouble? Contact [email protected]
