reassign 548305 libclass-accessor-perl thanks Turns out that libaudio-mpd-perl has somehow been broken by the libclass-accessor-perl 0.33-1 -> 0.34-1 upgrade.
This is the relevant code:
use Readonly;
use base qw[ Class::Accessor::Fast Exporter ];
__PACKAGE__->mk_accessors(
qw[ _conntype _host _password _port _socket
collection playlist version ] );
Readonly our $REUSE => 0;
Readonly our $ONCE => 1;
our @EXPORT = qw[ $REUSE $ONCE ];
Before upgrading libclass-accessor-perl, this exports $REUSE and $ONCE.
Afterwards, not. The reason seems to be that Class::Accessor interferes with
Exporter when multiple inheritence is used, as it is here. I was able to
work/around fix the bug in Audio::MPD by changing it like this:
use Exporter 'import';
use base qw[ Class::Accessor::Fast];
(mpdtoys 0.20 will work around this problem by using $Audio::MPD::REUSE.)
--
see shy jo
signature.asc
Description: Digital signature
