getRequested no longer needs to correct for gateway since Plack does it for us.
This commit is contained in:
parent
e6bbe65434
commit
86cb25acfc
1 changed files with 1 additions and 4 deletions
|
|
@ -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};
|
||||
}
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue