$attrs->{Chained} = q{/};
}
+ my $name = $_[0];
+ $name =~ s{^/}{};
+
# We need to turn the full chain name into a path, since two end points
# from two different chains could have the same end point name.
- my $name = ( $attrs->{Chained} eq '/' ? q{} : $attrs->{Chained} ) . q{/}
- . $_[0];
+ $name = ( $attrs->{Chained} eq '/' ? q{} : $attrs->{Chained} ) . q{/}
+ . $name;
my $meth_base = '__route__' . $name;