>>>>> "Jeff" == Jeff 'japhy' Pinyan <[EMAIL PROTECTED]> writes:
Jeff> sub new {
Jeff> my $that = shift;
Jeff> my $class = ref($that) || $that;
Jeff> my $self = $class->SUPER::new();
Jeff> $self->SUPER::_init();
There's a rule of thumb from smalltalk that if you're using a "super"
call with a method name other than your own, you just broke something.
And you just broke something.
The problem is not here. The problem is in _init, which also
needs to call SUPER::_init. And then the rule correctly points
out the solution. How nice.
Jeff> return $self;
Jeff> }
--
Randal L. Schwartz - Stonehenge Consulting Services, Inc. - +1 503 777 0095
<merlyn@stonehenge.com> <URL:http://www.stonehenge.com/merlyn/>
Perl/Unix/security consulting, Technical writing, Comedy, etc. etc.
See PerlTraining.Stonehenge.com for onsite and open-enrollment Perl training!
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
<http://learn.perl.org/> <http://learn.perl.org/first-response>
