From fc8fb59f6708036f9e62edccbf9dbf2f9c101c00 Mon Sep 17 00:00:00 2001
From: Jesse Luehrs <doy@tozt.net>
Date: Mon, 15 Nov 2010 12:38:31 -0600
Subject: don't hardcode the list of method names

---
 t/lib/Package/Stash.pm | 4 +---
 1 file changed, 1 insertion(+), 3 deletions(-)

diff --git a/t/lib/Package/Stash.pm b/t/lib/Package/Stash.pm
index fb25135..b804da4 100644
--- a/t/lib/Package/Stash.pm
+++ b/t/lib/Package/Stash.pm
@@ -8,9 +8,7 @@ use Package::Stash::XS;
 BEGIN {
     my $ps = Package::Stash::XS->new(__PACKAGE__);
     my $ps_xs = Package::Stash::XS->new('Package::Stash::XS');
-    for my $method (qw(new name namespace add_symbol remove_glob has_symbol
-                       get_symbol get_or_add_symbol remove_symbol
-                       list_all_symbols get_all_symbols)) {
+    for my $method ($ps_xs->list_all_symbols('CODE')) {
         my $sym = '&' . $method;
         $ps->add_symbol($sym => $ps_xs->get_symbol($sym));
     }
-- 
cgit v1.2.3-54-g00ecf