From 0b538d459f71326033edb95eca03a5665487bb51 Mon Sep 17 00:00:00 2001 From: franck cuny Date: Tue, 8 Jun 2010 11:04:48 +0200 Subject: want exact match --- lib/MooseX/Net/API/Meta/Method/APIMethod.pm | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) 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')) { -- cgit 1.4.1