| Subject: | using inherited modules |
Dist Name: Object-InsideOut-1.24
perl, v5.8.7 built for sun4-solaris
SunOS ntacnc71 5.8 Generic_108528-29 sun4u sparc SUNW,Sun-Blade-1500 Solaris
I'm not sure if this is really a bug. If you use a parent module in the
class definition of a derived class
ie.
package Parent::Class {
use Object::InsideOut;
_init :Init {
# initialize the Parent Class
# THIS WILL NOT HAPPEN WHEN A DERIVED::CLASS IS new()'ed
}
}
package Derived::Class {
use Parent::Class; #This line causes the problem
use Object::InsideOut qw(Parent::Class);
_init :Init {
# initialize the Derived Class
# ONLY THIS INIT WILL EXECUTE
}
}
only the :Init and :Destroy methods of the derived class are executed on
initilization. In other words, they are not cascaded as expected. I
now know not to do that but, others may feel some pain before they learn
to not use the classes they intend to inherit.
I just noticed that I don't have the latest version (1.33). I'll
upgrade and check if the problem persists.
Regards,
Doug