Pass $c along to path_prefix in _parse_PathPrefix_attr.
[catagits/Catalyst-Runtime.git] / lib / Catalyst / Controller.pm
index 45feacb..548b4a1 100644 (file)
@@ -384,8 +384,8 @@ sub _parse_ChainedParent_attr {
 }
 
 sub _parse_PathPrefix_attr {
-    my $self = shift;
-    return PathPart => $self->path_prefix;
+    my ( $self, $c ) = @_;
+    return PathPart => $self->path_prefix($c);
 }
 
 sub _parse_ActionClass_attr {