Skip Menu |

This queue is for tickets about the Object-Pad CPAN distribution.

Report information
The Basics
Id: 132338
Status: resolved
Priority: 0/
Queue: Object-Pad

People
Owner: Nobody in particular
Requestors: TEAM [...] cpan.org
Cc:
AdminCc:

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



Subject: Unable to find Object::Pad::UNIVERSAL when redeclaring class
Another one, variation of the child-cannot-find-slots case: $ perl -le'use Object::Pad; class Parent { has $thing = 2; } package Child; Object::Pad->import_into("Child"); eval "package Child; class Child extends Parent;"; class Child; has $other = 3; method other { return $other } print Child->new->other' Can't locate object method "INITSLOTS" via package "Object::Pad::UNIVERSAL" at lib/Object/Pad.xs line 442.
With the fix for RT132337 in place (bzr -r176) and remembering to run the relevant parts of this example at BEGIN time, this now works fine: $ cat rt132338.pl use Object::Pad; class Parent { has $thing = 2; } package Child; BEGIN { Object::Pad->import_into("Child"); eval "package Child; class Child extends Parent;"; } class Child; has $other = 3; method other { return $other } print Child->new->other, "\n"; leo@shy:~/src/perl/Object-Pad [bzr] $ perl -Mblib rt132338.pl 3 Perhaps this one is fixed by RT132337 ? -- Paul Evans
Now 0.21 is released which fixes RT132337 this one is fixed as well. -- Paul Evans