use the new names for the package-stash methods

diff --git a/lib/Class/MOP/Package.pm b/lib/Class/MOP/Package.pm
index 1c9293a..2d79261 100644 (file)
--- a/lib/Class/MOP/Package.pm
+++ b/lib/Class/MOP/Package.pm
@@ -103,39 +103,39 @@ sub namespace {
 
 sub add_package_symbol {
     my $self = shift;
-    $self->_package_stash->add_package_symbol(@_);
+    $self->_package_stash->add_symbol(@_);
 }
 
 sub remove_package_glob {
     my $self = shift;
-    $self->_package_stash->remove_package_glob(@_);
+    $self->_package_stash->remove_glob(@_);
 }
 
 # ... these functions deal with stuff on the namespace level
 
 sub has_package_symbol {
     my $self = shift;
-    $self->_package_stash->has_package_symbol(@_);
+    $self->_package_stash->has_symbol(@_);
 }
 
 sub get_package_symbol {
     my $self = shift;
-    $self->_package_stash->get_package_symbol(@_);
+    $self->_package_stash->get_symbol(@_);
 }
 
 sub get_or_add_package_symbol {
     my $self = shift;
-    $self->_package_stash->get_or_add_package_symbol(@_);
+    $self->_package_stash->get_or_add_symbol(@_);
 }
 
 sub remove_package_symbol {
     my $self = shift;
-    $self->_package_stash->remove_package_symbol(@_);
+    $self->_package_stash->remove_symbol(@_);
 }
 
 sub list_all_package_symbols {
     my $self = shift;
-    $self->_package_stash->list_all_package_symbols(@_);
+    $self->_package_stash->list_all_symbols(@_);
 }
 
 1;

diff --git a/t/081_meta_package_extension.t b/t/081_meta_package_extension.t
index 6bf3f6b..e0f393c 100644 (file)
--- a/t/081_meta_package_extension.t
+++ b/t/081_meta_package_extension.t
@@ -29,7 +29,7 @@ use Class::MOP;
         $class->meta->new_object(__INSTANCE__ => $class->SUPER::new(@_));
     }
 
-    sub add_package_symbol {
+    sub add_symbol {
         my ($self, $variable, $initial_value) = @_;
 
         (my $name = $variable) =~ s/^[\$\@\%\&]//;