| Subject: | Tests fail under Perl 5.10: Not a GLOB reference |
This is a followup to Debian bug report #467279:
http://bugs.debian.org/cgi-bin/bugreport.cgi?archive=no&bug=467279
It seems Perl 5.10 is stricter when it comes to dereferencing
not-yet-existing globs - This (very simple and somewhat dirty) patch
does the trick. Of course, I'm applying it to our package as dirty as it
is only because it only impacts 'make test' - Please make sure it is
correct and does not break more than what it helps ;-)
I also see our packaging is currently undermaintained - I am asking the
Debian maintainer to either become more active (i.e. fixing his bugs,
packaging your latest version, etc.) or to give this package to a more
responsive team.
Thank you very much,
--- libpod-webserver-perl-3.04.yours/t/01_about_verbose.t
2006-06-02 22:10:45.000000000 -0500
+++ libpod-webserver-perl-3.04/t/01_about_verbose.t
2008-05-28 10:45:36.000000000 -0500
@@ -43,8 +43,8 @@
if(defined ${$this . '::VERSION'} ) {
$v{$this} = ${$this . '::VERSION'}
} elsif(
- defined *{$this . '::ISA'} or defined &{$this . '::import'}
- or ($this ne '' and grep defined *{$_}{'CODE'}, values %{$this .
"::"})
+ eval{defined *{$this . '::ISA'}} or eval{defined &{$this .
'::import'}}
+ or ($this ne '' and eval{grep defined *{$_}{'CODE'}, values
%{$this . "::"}})
# If it has an ISA, an import, or any subs...
) {
# It's a class/module with no version.