README
AUTHORS
t/01basics.t
README
AUTHORS
t/01basics.t
t/02pod.t
t/03podcoverage.t
t/apache_mvc.t
t/02pod.t
t/03podcoverage.t
t/apache_mvc.t
sub component {
my ( $r, $path ) = @_;
sub component {
my ( $r, $path ) = @_;
- my $self = bless { parent => $r }, ref $r;
+ my $self = bless { parent => $r, config => $r->{config} }, ref $r;
my $url = URI->new($path);
my $url = URI->new($path);
$self->{path} = $url->path;
$self->parse_path;
$self->params( $url->query_form_hash );
$self->{path} = $url->path;
$self->parse_path;
$self->params( $url->query_form_hash );