Bug#478040: liblockfile-simple-perl: "-warn" option doesn't work

[Adrian von Bidder]

Package: liblockfile-simple-perl
Version: 0.206-1
Severity: minor
Tags: upstream

-----BEGIN PGP SIGNED MESSAGE-----
Hash: SHA1


Hi all!

(Ok, the upstream tag is just a guess.)

I'm calling LockFile like this:

LockFile::Simple->make(
        -autoclean => 1,
        -hold => 0,
        -stale => 1,
        -warn => 0)->lock('/var/lib/nihilist/db') || die "...";

so I can just forget about the lock and it will be removed for me when
the program is done.  However, I get "WARNING: releasing 1 pending
lock..." at program exit.  Setting -wfunc => undef instead of -warn
solves the problem, but warn is documented to suppress warnings too.

cheers
- -- vbi


- -- System Information:
Debian Release: lenny/sid
  APT prefers stable
  APT policy: (800, 'stable'), (700, 'testing'), (600, 'unstable'), (199, 'oldstable'), (60, 'experimental')
Architecture: i386 (i686)

Kernel: Linux 2.6.24-1-686 (SMP w/2 CPU cores)
Locale: LANG=en_US.UTF-8, LC_CTYPE=en_US.UTF-8 (charmap=UTF-8)
Shell: /bin/sh linked to /bin/bash

Versions of packages liblockfile-simple-perl depends on:
ii  liblog-agent-perl             0.307-1    Log::Agent - Helper logging routin
ii  perl                          5.8.8-12   Larry Wall's Practical Extraction 

liblockfile-simple-perl recommends no packages.

- -- no debconf information

-----BEGIN PGP SIGNATURE-----
Version: GnuPG v1.4.6 (GNU/Linux)
Comment: get my key from http://fortytwo.ch/gpg/92082481

iEYEARECAAYFAkgTPoYACgkQi6Qxi+Wn99YMnwCfcpssa1tuYpX1mlaEC6om1PPu
Qr0AnjcFSBrjQt/Pv1etYcnHzGAn+Dg1
=oJJO
-----END PGP SIGNATURE-----