Operations should be able to handle UTF-8 urls, too. Fixes bug #11683
This commit is contained in:
parent
c92d18259c
commit
49374b43eb
3 changed files with 11 additions and 2 deletions
|
|
@ -21,6 +21,7 @@ use URI::Escape;
|
|||
use Scalar::Util qw( weaken );
|
||||
use WebGUI::International;
|
||||
use WebGUI::Utility;
|
||||
use Encode;
|
||||
|
||||
|
||||
=head1 NAME
|
||||
|
|
@ -323,7 +324,7 @@ sub getRequestedUrl {
|
|||
my $self = shift;
|
||||
return undef unless ($self->session->request);
|
||||
unless ($self->{_requestedUrl}) {
|
||||
$self->{_requestedUrl} = $self->session->request->uri;
|
||||
$self->{_requestedUrl} = decode_utf8($self->session->request->uri);
|
||||
my $gateway = $self->session->config->get("gateway");
|
||||
$self->{_requestedUrl} =~ s/^$gateway([^?]*)\??.*$/$1/;
|
||||
}
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue