On 31 Jan 2005, at 16:42, David Wheeler wrote:

On Jan 30, 2005, at 3:26 PM, Adrian Howard wrote:

sub _test_classes {
        my $class = shift;
        grep { $_->isa( $class ) } Devel::Symdump->rnew->packages;
};

which means Devel::Symdump->rnew->packages must be returning something which isn't a package, which strikes me as a possible bug. Could you take a poke and see what Devel::Symdump->rnew->packages is returning on your box?

I got the same error, but Devel::Symdump is returning packages:
[snip]

Darn. This will mean I'm doing something very dense. Could you replace _test_classes with:

sub _test_classes {
        my $class = shift;
        warn "\n#};

and see where it's dying ?

Ta.

Adrian



Reply via email to