Bug#489113: libmoosex-strictconstructor-perl: FTBFS: Global symbol "%params" requires explicit package name at (eval 79) line 21.

[Lucas Nussbaum]

Package: libmoosex-strictconstructor-perl
Version: 0.05-1
Severity: serious
User: debian-qa at lists.debian.org
Usertags: qa-ftbfs-20080702 qa-ftbfs
Justification: FTBFS on i386

Hi,

During a rebuild of all packages in sid, your package failed to build on
i386.

Relevant part:
>  /usr/bin/fakeroot debian/rules clean
> dh_testdir
> dh_testroot
> dh_clean build-stamp install-stamp
> [ ! -f Build ] || /usr/bin/perl Build --allow_mb_mismatch 1 distclean
>  dpkg-source -b libmoosex-strictconstructor-perl-0.05-1
> dpkg-source: warning: source directory 'libmoosex-strictconstructor-perl-0.05-1' is not <sourcepackage>-<upstreamversion> 'libmoosex-strictconstructor-perl-0.05'
> dpkg-source: warning: .orig directory name libmoosex-strictconstructor-perl-0.05-1.orig is not <package>-<upstreamversion> (wanted libmoosex-strictconstructor-perl-0.05.orig)
> dpkg-source: info: using source format `1.0'
> dpkg-source: info: building libmoosex-strictconstructor-perl using existing libmoosex-strictconstructor-perl_0.05.orig.tar.gz
> dpkg-source: info: building libmoosex-strictconstructor-perl in libmoosex-strictconstructor-perl_0.05-1.diff.gz
> dpkg-source: info: building libmoosex-strictconstructor-perl in libmoosex-strictconstructor-perl_0.05-1.dsc
>  debian/rules build
> dh_testdir
> /usr/bin/perl Build.PL installdirs=vendor
> Checking whether your kit is complete...
> Looks good
> 
> Checking prerequisites...
> Looks good
> 
> Creating new 'Build' script for 'MooseX-StrictConstructor' version '0.05'
> /usr/bin/perl Build
> Copying lib/MooseX/StrictConstructor.pm -> blib/lib/MooseX/StrictConstructor.pm
> Copying lib/MooseX/StrictConstructor/Meta/Method/Constructor.pm -> blib/lib/MooseX/StrictConstructor/Meta/Method/Constructor.pm
> Copying lib/MooseX/Object/StrictConstructor.pm -> blib/lib/MooseX/Object/StrictConstructor.pm
> Copying lib/MooseX/StrictConstructor/Meta/Class.pm -> blib/lib/MooseX/StrictConstructor/Meta/Class.pm
> Manifying blib/lib/MooseX/StrictConstructor.pm -> blib/libdoc/MooseX::StrictConstructor.3pm
> Manifying blib/lib/MooseX/StrictConstructor/Meta/Class.pm -> blib/libdoc/MooseX::StrictConstructor::Meta::Class.3pm
> Manifying blib/lib/MooseX/Object/StrictConstructor.pm -> blib/libdoc/MooseX::Object::StrictConstructor.3pm
> Manifying blib/lib/MooseX/StrictConstructor/Meta/Method/Constructor.pm -> blib/libdoc/MooseX::StrictConstructor::Meta::Method::Constructor.3pm
> IS_MAINTAINER=1 /usr/bin/perl Build test
> t/basic...........Could not eval the constructor :
> 
> sub {
> my $class = shift;
> return $class->Moose::Object::new(@_)
>     if $class ne 'ImmutableInitArg';
> my $params = do {
> no warnings "uninitialized";
> confess "Single parameters to new() must be a HASH ref"
>     if scalar @_ == 1 && defined $_[0] && ref($_[0]) ne q{HASH};
> (scalar @_ == 1) ? {%{$_[0]}} : {@_};
> };
> my $instance = bless {} => $class;
> ## thing
> (exists $params->{'other'}) && do {
> my $val = $params->{'other'};
> $instance->{'thing'} = $val;
> };
> ## size;
> ;
> my %attrs = (other => 1,);
> 
> my @bad = sort grep { ! $attrs{$_} }  keys %params;
> 
> if (@bad) {
>     Carp::confess "Found unknown attribute(s) passed to the constructor: @bad";
> }
> ;
> return $instance;
> }
> 
> because :
> 
> Global symbol "%params" requires explicit package name at (eval 79) line 21.
>  at /usr/share/perl5/Moose/Meta/Method/Constructor.pm line 118
> 	Moose::Meta::Method::Constructor::initialize_body('MooseX::StrictConstructor::Meta::Method::Constructor=HASH(0x8...') called at /usr/share/perl5/Moose/Meta/Method/Constructor.pm line 44
> 	Moose::Meta::Method::Constructor::new('MooseX::StrictConstructor::Meta::Method::Constructor', 'options', 'HASH(0x82cd008)', 'metaclass', 'MooseX::StrictConstructor::Meta::Class=HASH(0x8577f88)', 'is_inline', 1, 'package_name', 'ImmutableInitArg', ...) called at /usr/lib/perl5/Class/MOP/Immutable.pm line 98
> 	Class::MOP::Immutable::make_metaclass_immutable('Class::MOP::Immutable=HASH(0x85aa478)', 'MooseX::StrictConstructor::Meta::Class=HASH(0x8577f88)', 'HASH(0x834dc68)') called at /usr/lib/perl5/Class/MOP/Class.pm line 955
> 	Class::MOP::Class::make_immutable('MooseX::StrictConstructor::Meta::Class=HASH(0x8577f88)', 'constructor_class', 'Moose::Meta::Method::Constructor', 'destructor_class', 'Moose::Meta::Method::Destructor', 'inline_destructor', 1, 'inline_accessors', 0, ...) called at /usr/share/perl5/Moose/Meta/Class.pm line 408
> 	Moose::Meta::Class::make_immutable('MooseX::StrictConstructor::Meta::Class=HASH(0x8577f88)', 'constructor_class', 'MooseX::StrictConstructor::Meta::Method::Constructor') called at /build/user-libmoosex-strictconstructor-perl_0.05-1-amd64-ntvJp3/libmoosex-strictconstructor-perl-0.05-1/blib/lib/MooseX/StrictConstructor/Meta/Class.pm line 18
> 	Class::MOP::Class:::around('CODE(0x8430c38)', 'MooseX::StrictConstructor::Meta::Class=HASH(0x8577f88)') called at /usr/lib/perl5/Class/MOP/Method/Wrapped.pm line 128
> 	Class::MOP::Method::Wrapped::__ANON__('MooseX::StrictConstructor::Meta::Class=HASH(0x8577f88)') called at /usr/lib/perl5/Class/MOP/Method/Wrapped.pm line 88
> 	MooseX::StrictConstructor::Meta::Class::make_immutable('MooseX::StrictConstructor::Meta::Class=HASH(0x8577f88)') called at t/basic.t line 67
> # Looks like your test died before it could output anything.
> dubious
> 	Test returned status 255 (wstat 65280, 0xff00)
> DIED. FAILED tests 1-15
> 	Failed 15/15 tests, 0.00% okay
> t/perlcritic......ok
> t/pod-coverage....ok
> t/pod.............ok
> Failed Test Stat Wstat Total Fail  List of Failed
> -------------------------------------------------------------------------------
> t/basic.t    255 65280    15   30  1-15
> Failed 1/4 test scripts. 15/27 subtests failed.
> Files=4, Tests=27,  2 wallclock secs ( 1.49 cusr +  0.06 csys =  1.55 CPU)
> Failed 1/4 test programs. 15/27 subtests failed.
> make: *** [build-stamp] Error 255

The full build log is available from:
   http://people.debian.org/~lucas/logs/2008/07/02

A list of current common problems and possible solutions is available at 
http://wiki.debian.org/qa.debian.org/FTBFS . You're welcome to contribute!

About the archive rebuild: The rebuild was done on about 50 AMD64 nodes
of the Grid'5000 platform, using a clean chroot containing a sid i386
environment.  Internet was not accessible from the build systems.

-- 
| Lucas Nussbaum
| lucas at lucas-nussbaum.net   http://www.lucas-nussbaum.net/ |
| jabber: lucas at nussbaum.fr             GPG: 1024D/023B3F4F |