dani/lemonldap-ng
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Remove SCRIPT_NAME from PATH_INFO

Browse Source
This commit is contained in:
Xavier Guimard 2015-12-16 11:37:41 +00:00
parent 4a5bfa6354
commit 37be45b36a
1 changed files with 4 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
lemonldap-ng-common/lib/Lemonldap/NG/Common/PSGI/Request.pm
View File

@ -26,8 +26,9 @@ has PATH_INFO => (
lazy => 1,
default => '',
trigger => sub {
$_[0]->{REQUEST_URI} = uri_unescape( $_[0]->{REQUEST_URI} );
$_[0]->{REQUEST_URI} =~ s|//+|/|;
my $tmp = $_[0]->{SCRIPT_NAME};
$_[0]->{PATH_INFO} =~ s|^$tmp|/|;
$_[0]->{PATH_INFO} =~ s|//+|/|g;
},
);
has REQUEST_URI => (
@ -36,6 +37,7 @@ has REQUEST_URI => (
trigger => sub {
$_[0]->{unparsed_uri} = $_[0]->{REQUEST_URI};
$_[0]->{REQUEST_URI} = uri_unescape( $_[0]->{REQUEST_URI} );
$_[0]->{REQUEST_URI} =~ s|//+|/|g;
},
);
has unparsed_uri => ( is => 'rw', isa => 'Str' );