From 875b87667bc367908c46fe2c2e61b5e2f4089a37 Mon Sep 17 00:00:00 2001
From: franck cuny <franck@lumberjaph.net>
Date: Thu, 24 Jun 2010 16:32:09 +0200
Subject: fix regex

---
 lib/MooseX/Net/API/Meta/Method.pm | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

(limited to 'lib/MooseX/Net/API/Meta/Method.pm')

diff --git a/lib/MooseX/Net/API/Meta/Method.pm b/lib/MooseX/Net/API/Meta/Method.pm
index ddd84f9..d2c9ab1 100644
--- a/lib/MooseX/Net/API/Meta/Method.pm
+++ b/lib/MooseX/Net/API/Meta/Method.pm
@@ -198,10 +198,10 @@ sub _build_path {
             $path =~ s/(?:\$|:)$match/$value/;
         }
         if ($max_iter > $i) {
-            $path =~ s/(?:\/)?(?:$|:)(?:.*)$//;
+            $path =~ s/(?:\/?(?:$|:).*)$//;
         }
     }
-    $path =~ s/(?:\/)?(?:$|:)(?:.*)$//;
+    $path =~ s/(?:\/?(?:$|:).*)$//;
     return $path;
 }
 
-- 
cgit 1.4.1