getRequested no longer needs to correct for gateway since Plack does it for us.

This commit is contained in:
Colin Kuskie 2011-01-11 21:08:16 -08:00
parent e6bbe65434
commit 86cb25acfc

View file

@ -323,11 +323,8 @@ Returns the URL of the page requested (no gateway, no query params, just the pag
sub getRequestedUrl {
my $self = shift;
return undef unless (my $request = $self->session->request);
unless ($self->{_requestedUrl}) {
$self->{_requestedUrl} = decode_utf8($request->path_info); # TODO - is path_info right?
my $gateway = $request->base->path;
$self->{_requestedUrl} =~ s/^$gateway([^?]*)\??.*$/$1/;
$self->{_requestedUrl} = decode_utf8($self->session->request->path_info);
}
return $self->{_requestedUrl};
}