summary refs log tree commit diff
diff options
context:
space:
mode:
authorfranck cuny <franck@lumberjaph.net>2010-06-08 11:04:48 +0200
committerfranck cuny <franck@lumberjaph.net>2010-06-08 11:04:48 +0200
commit0b538d459f71326033edb95eca03a5665487bb51 (patch)
tree6b0a28ac1a078bb86eff97042595432295103d94
parentremove http-console (diff)
downloadmoosex-net-api-0b538d459f71326033edb95eca03a5665487bb51.tar.gz
want exact match
-rw-r--r--lib/MooseX/Net/API/Meta/Method/APIMethod.pm2
1 files changed, 1 insertions, 1 deletions
diff --git a/lib/MooseX/Net/API/Meta/Method/APIMethod.pm b/lib/MooseX/Net/API/Meta/Method/APIMethod.pm
index 791c8f8..f1e4ff2 100644
--- a/lib/MooseX/Net/API/Meta/Method/APIMethod.pm
+++ b/lib/MooseX/Net/API/Meta/Method/APIMethod.pm
@@ -23,7 +23,7 @@ has local_net_api_methods => (
 
 sub find_net_api_method_by_name {
     my ($meta, $name) = @_;
-    my $method_name = $meta->_find_net_api_method_by_name(sub{/$name/});
+    my $method_name = $meta->_find_net_api_method_by_name(sub{/^$name$/});
     return unless $method_name;
     my $method = $meta->find_method_by_name($method_name);
     if ($method->isa('Class::MOP::Method::Wrapped')) {