diff options
| author | franck cuny <franck@lumberjaph.net> | 2010-06-25 15:34:27 +0200 |
|---|---|---|
| committer | franck cuny <franck@lumberjaph.net> | 2010-06-25 15:34:27 +0200 |
| commit | 91a5b204b47506896b3706df7db4787cbc1e2611 (patch) | |
| tree | cbe5d23ae5cc516e98ff42ca0ce5ca0a4fa00750 | |
| parent | fix regex (diff) | |
| download | moosex-net-api-91a5b204b47506896b3706df7db4787cbc1e2611.tar.gz | |
another fix for path
| -rw-r--r-- | lib/MooseX/Net/API/Meta/Method.pm | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lib/MooseX/Net/API/Meta/Method.pm b/lib/MooseX/Net/API/Meta/Method.pm index d2c9ab1..8879e04 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; } |