Skip Menu |
 

This queue is for tickets about the Storm CPAN distribution.

Report information
The Basics
Id: 91017
Status: open
Priority: 0/
Queue: Storm

People
Owner: Nobody in particular
Requestors: upasna.shukla [...] gmail.com
cpan [...] zoffix.com
Cc:
AdminCc:

Bug Information
Severity: (no value)
Broken in: (no value)
Fixed in: (no value)



Subject: New Moose may break your code
Date: Fri, 29 Nov 2013 03:42:43 +0530
To: bug-Storm [...] rt.cpan.org
From: "Upasana Shukla" <upasna.shukla [...] gmail.com>
Download (untitled) / with headers
text/plain 535b
We recently deprecated Class::MOP::load_class in Moose. It appears that your module is affected. You can read more about the change here: https://metacpan.org/pod/release/ETHER/Moose-2.1106-TRIAL/lib/Moose/Manual/Delta.pod#pod2.1200 We recommend that you take a look at your code to see if it indeed does need to be updated with respect to the latest Moose release, 2.1106-TRIAL. If you have any questions, then please ask either on Moose mailing list : http://lists.perl.org/list/moose.html or on #moose & #moose-dev on irc.perl.org.
Attached patch fixes the issue. -- Cheers, ZZ [ https://metacpan.org/author/ZOFFIX ]
Subject: Storm-0.240.patch
Download Storm-0.240.patch
text/x-diff 969b
diff -Naur Storm-0.240_orig/dist.ini Storm-0.240/dist.ini --- Storm-0.240_orig/dist.ini 2014-01-24 21:51:31.794577603 -0500 +++ Storm-0.240/dist.ini 2014-01-24 21:52:14.122578155 -0500 @@ -21,6 +21,7 @@ MooseX::SemiAffordanceAccessor = 0 MooseX::StrictConstructor = 0 MooseX::Types = 0 +Class::Load = 0.20 [PruneCruft] diff -Naur Storm-0.240_orig/lib/Storm/Role/Model/Meta/Class.pm Storm-0.240/lib/Storm/Role/Model/Meta/Class.pm --- Storm-0.240_orig/lib/Storm/Role/Model/Meta/Class.pm 2014-01-24 21:51:31.790577603 -0500 +++ Storm-0.240/lib/Storm/Role/Model/Meta/Class.pm 2014-01-24 21:52:03.570578019 -0500 @@ -3,6 +3,7 @@ $Storm::Role::Model::Meta::Class::VERSION = '0.240'; } +use Class::Load; use Moose::Role; use MooseX::Types::Moose qw( HashRef ); @@ -21,7 +22,7 @@ sub register_class { $_[0]->_register_class( $_[1], 1 ); - Class::MOP::load_class( $_[1] ); + Class::Load::load_class( $_[1] ); } 1; \ No newline at end of file


This service is sponsored and maintained by Best Practical Solutions and runs on Perl.org infrastructure.

Please report any issues with rt.cpan.org to rt-cpan-admin@bestpractical.com.