X-Git-Url: https://git.decadent.org.uk/gitweb/?p=maypole.git;a=blobdiff_plain;f=lib%2FMaypole.pm;h=83607c8db34137662cf0694cf8a494179d319d18;hp=59b519706c939f83fb774b16d685295fe88e5a4e;hb=f94c2679992bf0db0b360a0a475b3e646466aee0;hpb=3fe0b0765144ea1a88a73e1aaf149cea290708a0 diff --git a/lib/Maypole.pm b/lib/Maypole.pm index 59b5197..83607c8 100644 --- a/lib/Maypole.pm +++ b/lib/Maypole.pm @@ -481,19 +481,24 @@ request. You'll need to set up actions and templates which return fragments of HTML rather than entire pages, but once you've done that, you can use the C method of the Maypole request object to call those actions. You may pass a query string in the usual URL style. + You should not fully qualify the Maypole URLs. +Note: any HTTP POST or URL parameters passed to the parent are not passed to the +component sub-request, only what is included in the url passed as an argyument +to the method + =cut sub component { my ( $r, $path ) = @_; - my $self = bless { parent => $r, config => $r->{config} }, ref $r; + my $self = bless { parent => $r, config => $r->{config}, template_args => {}, }, ref $r; + $self->get_user; my $url = URI->new($path); warn "path : $path\n"; $self->{path} = $url->path; $self->parse_path; $self->params( $url->query_form_hash ); - $self->query( $r->params ); $self->handler_guts; return $self->output; }