Package: libdb-file-lock-perl
Version: 0.05-1
Severity: important
Tags: patch upstream
Please replace
my $self = $tie_type eq "TIEHASH"
? $package->SUPER::TIEHASH(@_)
: $package->SUPER::TIEARRAY(@_);
by
my $self = $tie_type eq "TIEHASH"
? $package->SUPER::TIEHASH(@dbfile_data)
: $package->SUPER::TIEARRAY(@dbfile_data);
Otherwise the whole module doesn't work at all if providing the
DB_File args as an array ref. Even worse the module doesn't notice
that it doesn't work and writes the data to a file named
"ARRAY(0x<somenumber>)"...
Obviously nobody ever tried that feature...
Gruesse,
Frank Lichtenheld
-- System Information:
Debian Release: testing/unstable
APT prefers unstable
APT policy: (500, 'unstable'), (500, 'testing'), (1, 'experimental')
Architecture: powerpc (ppc)
Shell: /bin/sh linked to /bin/bash
Kernel: Linux 2.6.12-1-powerpc
Locale: LANG=de_DE.UTF-8, LC_CTYPE=de_DE.UTF-8 (charmap=UTF-8)
Versions of packages libdb-file-lock-perl depends on:
ii perl 5.8.7-6 Larry Wall's Practical Extraction
libdb-file-lock-perl recommends no packages.
-- no debconf information
--
To UNSUBSCRIBE, email to [EMAIL PROTECTED]
with a subject of "unsubscribe". Trouble? Contact [EMAIL PROTECTED]
