Bug#600290: libgnupg-interface-perl: get_secret_keys method with no arguments produces warning

[Matthew James Goins]

Package: libgnupg-interface-perl
Version: 0.42.002-1
Severity: normal

Calling the get_secret_keys method produces the following
error/warning:

	Use of uninitialized value $expiration_date in string eq \
	at /usr/share/perl5/GnuPG/Interface.pm line 555, <GEN1> line 4

To reproduce, create a keyring with a secret key available, and run the
following code or equivalent:

	my $gnupg = GnuPG::Interface->new();
	$gnupg->options->hash_init( armor => 1 );
	my @keys = $gnupg->get_secret_keys();

Compare with:

	my @keys = $gnupg->get_secret_keys("3DF8B223"); 

Substituting 3DF8B223 with your key id.

Thank you!

--mjgoins


-- System Information:
Debian Release: squeeze/sid
  APT prefers testing
  APT policy: (600, 'testing'), (500, 'unstable'), (500, 'stable'), (1, 'experimental')
Architecture: i386 (i686)

Kernel: Linux 2.6.32-5-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/dash

Versions of packages libgnupg-interface-perl depends on:
ii  gnupg                         1.4.10-4   GNU privacy guard - a free PGP rep
ii  libany-moose-perl             0.13-1     module to use either Moose or Mous
ii  perl                          5.10.1-14  Larry Wall's Practical Extraction 

libgnupg-interface-perl recommends no packages.

libgnupg-interface-perl suggests no packages.

-- no debconf information