From f7d144481f8a864e613d7f401c4e03e3ad05e81c Mon Sep 17 00:00:00 2001
From: Jacques Garrigue <garrigue at math.nagoya-u.ac.jp>
Date: Wed, 17 Apr 2002 05:36:36 +0000
Subject: Ocamlbrowser, le retour. Merci Xavier

git-svn-id: http://caml.inria.fr/svn/ocaml/trunk@4686 f963ae5c-01c2-4b8c-9fe0-0dff7051ff02
---
 otherlibs/labltk/browser/setpath.ml | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'otherlibs/labltk/browser/setpath.ml')

diff --git a/otherlibs/labltk/browser/setpath.ml b/otherlibs/labltk/browser/setpath.ml
index 82d9b2a60..3e7470dfc 100644
--- a/otherlibs/labltk/browser/setpath.ml
+++ b/otherlibs/labltk/browser/setpath.ml
@@ -57,7 +57,7 @@ let add_to_path ~dirs ?(base="") box =
       begin function
           "." -> base 
         | ".." -> Filename.dirname base
-        | x -> base ^ "/" ^ x
+        | x -> Filename.concat base x
       end
   in
   set_load_path
-- 
cgit v1.2.3-70-g09d2