From 538c723b8c4732a5754015e7fd7d80ab78d71e7b Mon Sep 17 00:00:00 2001
From: Xavier Guimard <xavier.guimard@laposte.net>
Date: Fri, 24 Feb 2017 11:23:16 +0000
Subject: [PATCH] Improve PATH_INFO split (#1175)

---
 lemonldap-ng-common/lib/Lemonldap/NG/Common/PSGI/Request.pm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/lemonldap-ng-common/lib/Lemonldap/NG/Common/PSGI/Request.pm b/lemonldap-ng-common/lib/Lemonldap/NG/Common/PSGI/Request.pm
index 3af226b9d..a48c3d50c 100644
--- a/lemonldap-ng-common/lib/Lemonldap/NG/Common/PSGI/Request.pm
+++ b/lemonldap-ng-common/lib/Lemonldap/NG/Common/PSGI/Request.pm
@@ -25,8 +25,8 @@ sub new {
     my $tmp  = $self->script_name;
     $self->env->{REQUEST_URI} = $self->env->{X_ORIGINAL_URI}
       if ( $self->env->{X_ORIGINAL_URI} );
-    $self->env->{PATH_INFO} =~ s|^$tmp|/|;
     $self->env->{PATH_INFO} =~ s|//+|/|g;
+    $self->env->{PATH_INFO} =~ s|^$tmp|/|;
     $self->{uri} = uri_unescape( $self->env->{REQUEST_URI} );
     $self->{uri} =~ s|//+|/|g;
     $self->{error}       = 0;