Bug 1420330

Summary: perl-Archive-RPM-0.07-13.fc26 FTBFS: syntax error at inline delegation in Archive::RPM for _header->(<=>
Product: [Fedora] Fedora Reporter: Petr Pisar <ppisar>
Component: perl-Archive-RPMAssignee: Petr Pisar <ppisar>
Status: CLOSED RAWHIDE QA Contact: Fedora Extras Quality Assurance <extras-qa>
Severity: unspecified Docs Contact:
Priority: unspecified    
Version: rawhideCC: jplesnik, perl-devel
Target Milestone: ---   
Target Release: ---   
Hardware: Unspecified   
OS: Unspecified   
URL: https://apps.fedoraproject.org/koschei/build/2527061
Whiteboard:
Fixed In Version: perl-Archive-RPM-0.07-15.fc26 Doc Type: If docs needed, set a value
Doc Text:
Story Points: ---
Clone Of: Environment:
Last Closed: 2017-02-16 11:02:51 UTC Type: Bug
Regression: --- Mount Type: ---
Documentation: --- CRM:
Verified Versions: Category: ---
oVirt Team: --- RHEL 7.3 requirements from Atomic Host:
Cloudforms Team: --- Target Upstream Version:
Embargoed:

Description Petr Pisar 2017-02-08 13:18:11 UTC
perl-Archive-RPM-0.07-13.fc26 fails to build in F26 because tests fail:

PERL_DL_NONLAZY=1 "/usr/bin/perl" "-MExtUtils::Command::MM" "-MTest::Harness" "-e" "undef *Test::Harness::Switches; test_harness(0, 'inc', 'blib/lib', 'blib/arch')" t/*.t xt/*.t
#   Failed test 'use Archive::RPM;'
#   at t/00-load.t line 4.
#     Tried to use 'Archive::RPM'.
#     Error:  Could not generate inline handles for _header->(<=> because : Failed to compile source: syntax error at inline delegation in Archive::RPM for _header->(<=> (attribute declared in /builddir/build/BUILD/Archive-RPM-0.07/blib/lib/Archive/RPM.pm at line 68) line 18, near "<=>( "
# 
# 
# source:
# #line 1 "inline delegation in Archive::RPM for _header->(<=> (attribute declared in /builddir/build/BUILD/Archive-RPM-0.07/blib/lib/Archive/RPM.pm at line 68)"
# sub {
#     my $self = shift;
# 
#     my $proxy = $self->_header;
#     if ( !defined $proxy ) {
#         die Module::Runtime::use_module("Moose::Exception::AttributeValueIsNotDefined")->new(method    => $self->meta->find_method_by_name("(<=>"),
# instance  => $self,
# attribute => $self->meta->find_attribute_by_name("_header"),
# );
#     }
#     elsif ( ref $proxy && !Scalar::Util::blessed($proxy) ) {
#         die Module::Runtime::use_module("Moose::Exception::AttributeValueIsNotAnObject")->new(method      => $self->meta->find_method_by_name("(<=>"),
# instance    => $self,
# attribute   => $self->meta->find_attribute_by_name("_header"),
# given_value => $proxy,
# );
#     }
#     return $proxy->(<=>( @_ );
# }
#  at /usr/lib/perl5/vendor_perl/Class/MOP/Method/Generated.pm line 56.
#  at /usr/lib/perl5/vendor_perl/Moose/Meta/Method/Delegation.pm line 148
# 	Moose::Meta::Method::Delegation::catch {...} ('Failed to compile source: syntax error at inline delegation in Archive::RPM for _header->(<=> (attribute declared in /builddir/build/BUILD/Archive-RPM-0.07/blib/lib/Archive/RPM.pm at line 68) line 18, near "<=>( "^J^J^Jsource:^J#line 1 "inline delegation in Archive::RPM for _header->(<=> (attribute declared in /builddir/build/BUILD/Archive-RPM-0.07/blib/lib/Archive/RPM.pm at line 68)"^Jsub {^J    my $self = shift;^J^J    my $proxy = $self->_header;^J    if ( !defined $proxy ) {^J        die Module::Runtime::use_module("Moose::Exception::AttributeValueIsNotDefined")->new(method    => $self->meta->find_method_by_name("(<=>"),^Jinstance  => $self,^Jattribute => $self->meta->find_attribute_by_name("_header"),^J);^J    }^J    elsif ( ref $proxy && !Scalar::Util::blessed($proxy) ) {^J        die Module::Runtime::use_module("Moose::Exception::AttributeValueIsNotAnObject")->new(method      => $self->meta->find_method_by_name("(<=>"),^Jinstance    => $self,^Jattribute   => $self->meta->find_attribute_by_name("_header"),^Jgiven_value => $proxy,^J);^J    }^J    return $proxy->(<=>( @_ );^J}^J at /usr/lib/perl5/vendor_perl/Class/MOP/Method/Generated.pm line 56.^J') called at /usr/share/perl5/vendor_perl/Try/Tiny.pm line 124
# 	Try::Tiny::try('CODE(0xb785688)', 'Try::Tiny::Catch=REF(0xb7706b0)') called at /usr/lib/perl5/vendor_perl/Moose/Meta/Method/Delegation.pm line 154
# 	Moose::Meta::Method::Delegation::_generate_inline_method('Moose::Meta::Method::Delegation=HASH(0xa149be0)') called at /usr/lib/perl5/vendor_perl/Moose/Meta/Method/Delegation.pm line 82
# 	Moose::Meta::Method::Delegation::_initialize_body('Moose::Meta::Method::Delegation=HASH(0xa149be0)') called at /usr/lib/perl5/vendor_perl/Moose/Meta/Method/Delegation.pm line 54
# 	Moose::Meta::Method::Delegation::new('Moose::Meta::Method::Delegation', 'name', '(<=>', 'package_name', 'Archive::RPM', 'attribute', 'Moose::Meta::Attribute=HASH(0xb774c68)', 'delegate_to_method', '(<=>', 'curried_arguments', 'ARRAY(0xa301c80)') called at /usr/lib/perl5/vendor_perl/Moose/Meta/Attribute.pm line 1279
# 	Moose::Meta::Attribute::_make_delegation_method('Moose::Meta::Attribute=HASH(0xb774c68)', '(<=>', '(<=>') called at /usr/lib/perl5/vendor_perl/Moose/Meta/Attribute.pm line 1146
# 	Moose::Meta::Attribute::install_delegation('Moose::Meta::Attribute=HASH(0xb774c68)') called at /usr/lib/perl5/vendor_perl/Moose/Meta/Attribute.pm line 1015
# 	Moose::Meta::Attribute::install_accessors('Moose::Meta::Attribute=HASH(0xb774c68)') called at /usr/lib/perl5/vendor_perl/Class/MOP/Class.pm line 899
# 	Class::MOP::Class::try {...}  at /usr/share/perl5/vendor_perl/Try/Tiny.pm line 103
# 	eval {...} at /usr/share/perl5/vendor_perl/Try/Tiny.pm line 94
# 	Try::Tiny::try('CODE(0xb7744b8)', 'Try::Tiny::Catch=REF(0xb7745d8)') called at /usr/lib/perl5/vendor_perl/Class/MOP/Class.pm line 904
# 	Class::MOP::Class::_post_add_attribute('Moose::Meta::Class::__ANON__::SERIAL::1=HASH(0xa4c52e0)', 'Moose::Meta::Attribute=HASH(0xb774c68)') called at /usr/lib/perl5/vendor_perl/Class/MOP/Mixin/HasAttributes.pm line 39
# 	Class::MOP::Mixin::HasAttributes::add_attribute('Moose::Meta::Class::__ANON__::SERIAL::1=HASH(0xa4c52e0)', 'Moose::Meta::Attribute=HASH(0xb774c68)') called at /usr/lib/perl5/vendor_perl/Moose/Meta/Class.pm line 583
# 	Moose::Meta::Class::add_attribute('Moose::Meta::Class::__ANON__::SERIAL::1=HASH(0xa4c52e0)', '_header', 'definition_context', 'HASH(0xb7742c8)', 'is', 'ro', 'isa', 'RPM2::Header', 'lazy_build', 1, 'handles', 'Regexp=REGEXP(0xa3e59c0)') called at /usr/lib/perl5/vendor_perl/Moose.pm line 74
# 	Moose::has('Moose::Meta::Class::__ANON__::SERIAL::1=HASH(0xa4c52e0)', '_header', 'is', 'ro', 'isa', 'RPM2::Header', 'lazy_build', 1, 'handles', 'Regexp=REGEXP(0xa3e59c0)') called at /usr/lib/perl5/vendor_perl/Moose/Exporter.pm line 419
# 	Moose::has('_header', 'is', 'ro', 'isa', 'RPM2::Header', 'lazy_build', 1, 'handles', 'Regexp=REGEXP(0xa3e59c0)') called at /builddir/build/BUILD/Archive-RPM-0.07/blib/lib/Archive/RPM.pm line 68
# 	require Archive/RPM.pm at t/00-load.t line 4
# 	main::BEGIN at /builddir/build/BUILD/Archive-RPM-0.07/blib/lib/Archive/RPM.pm line 0
# 	eval {...} at /builddir/build/BUILD/Archive-RPM-0.07/blib/lib/Archive/RPM.pm line 0
# 	eval 'package main;
# BEGIN { ${^WARNING_BITS} = $args[-1] if defined $args[-1] }
# #line 4 t/00-load.t
# use Archive::RPM @{$args[0]};
# 1;
# ' at /usr/share/perl5/vendor_perl/Test/More.pm line 1032
# 	Test::More::_eval('package main;^JBEGIN { ${^WARNING_BITS} = $args[-1] if defined $args[-1] }^J#line 4 t/00-load.t^Juse Archive::RPM @{$args[0]};^J1;^J', 'ARRAY(0x9d0a190)', undef) called at /usr/share/perl5/vendor_perl/Test/More.pm line 1007
# 	Test::More::use_ok('Archive::RPM') called at t/00-load.t line 4
# 	main::BEGIN at /builddir/build/BUILD/Archive-RPM-0.07/blib/lib/Archive/RPM.pm line 0
# 	eval {...} at /builddir/build/BUILD/Archive-RPM-0.07/blib/lib/Archive/RPM.pm line 0
# Compilation failed in require at t/00-load.t line 4, <DATA> line 1.
# BEGIN failed--compilation aborted at t/00-load.t line 4, <DATA> line 1.
# Testing Archive::RPM 0.07, Perl 5.024001, /usr/bin/perl
# Looks like you failed 1 test of 1.
t/00-load.t ........... 
Dubious, test returned 1 (wstat 256, 0x100)
Failed 1/1 subtests 

This is cause by upgrading perl-Moose from 2.1807-1.fc26 to 2.2000-1.fc26.