use Scalar::Util 'blessed';
use Carp 'confess';
-our $VERSION = '0.71_02';
+our $VERSION = '0.78';
$VERSION = eval $VERSION;
our $AUTHORITY = 'cpan:STEVAN';
my $namespace = $self->namespace;
- if (wantarray) {
- warn 'Class::MOP::Package::get_all_package_symbols in list context is deprecated. use scalar context instead.';
- }
-
- return (wantarray ? %$namespace : $namespace) unless defined $type_filter;
+ return $namespace unless defined $type_filter;
my %ret;
# for some reason this nasty impl is orders of magnitude faster than a clean version
} keys %$namespace;
}
- return wantarray ? %ret : \%ret;
+ return \%ret;
}
1;
L<Class::MOP::Class> and provides all of the symbol table
introspection methods.
+=head1 INHERITANCE
+
+B<Class::MOP::Package> is a subclass of L<Class::MOP::Object>
+
=head1 METHODS
=over 4