From 945e7f209b5af2def3643300862dd7f0910488dc Mon Sep 17 00:00:00 2001
From: Rodolphe Quiedeville <rodolphe@quiedeville.org>
Date: Wed, 18 Jun 2003 16:32:23 +0000
Subject: [PATCH] Correction du DOL_URL_ROOT

---
 htdocs/main.inc.php3 | 7 +++++--
 1 file changed, 5 insertions(+), 2 deletions(-)

diff --git a/htdocs/main.inc.php3 b/htdocs/main.inc.php3
index 9424d9a091b..e826cf97332 100644
--- a/htdocs/main.inc.php3
+++ b/htdocs/main.inc.php3
@@ -37,8 +37,11 @@ if (strtolower(substr($dolibarr_main_url_root, 0, 7)) == 'https:/')
 {
   $uri = substr($dolibarr_main_url_root, 8);
 }
-
-$pos = substr(strstr ($uri, '/'), 1);
+$pos = strstr ($uri, '/');
+if ($pos == '/')
+{
+  $pos = '';
+}
 define('DOL_URL_ROOT', $pos);
 
 require (DOL_DOCUMENT_ROOT."/conf/conf.class.php3");