Plack::Request->path_info includes the query string! Argh.

This commit is contained in:
Colin Kuskie 2012-03-12 07:56:10 -07:00
parent 2fd4f74911
commit 5ad34a9266

View file

@ -324,7 +324,9 @@ Returns the URL of the page requested (no gateway, no query params, just the pag
sub getRequestedUrl {
my $self = shift;
unless ($self->{_requestedUrl}) {
$self->{_requestedUrl} = decode_utf8($self->session->request->path_info);
my $path_info = $self->session->request->path_info;
$path_info =~ s/\?.*//;
$self->{_requestedUrl} = decode_utf8($path_info);
}
return $self->{_requestedUrl};
}