On Sun, 16 Sep 2001, Stas wrote:
> Hmm, we don't want to pass the package name to the package itself
why not?
> this fixes it, so we can write:
>
> sub APACHE_TEST_CONFIG {
> my $self = shift;
this seems fine to me:
my($class, $config) = @_;
> - eval { $module->APACHE_TEST_CONFIGURE($self); };
> + no strict 'refs';
> + eval { "${module}::APACHE_TEST_CONFIGURE"->($self) };
this way passes use strict:
my $cv = \&{"${module}::APACHE_TEST_CONFIGURE"};
eval { $cv->($self) };
but i think the current way in cvs is correct.
