From 77d4f18ce657800ebd85530c510521b467d7c3dd Mon Sep 17 00:00:00 2001
From: Jacques Garrigue <garrigue at math.nagoya-u.ac.jp>
Date: Wed, 8 Dec 1999 08:21:57 +0000
Subject: changed label_pattern syntax

git-svn-id: http://caml.inria.fr/svn/ocaml/trunk@2677 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 f9c478b07..8094b82e0 100644
--- a/otherlibs/labltk/browser/setpath.ml
+++ b/otherlibs/labltk/browser/setpath.ml
@@ -34,7 +34,7 @@ let renew_path box =
   Listbox.insert box index:`End texts:!Config.load_path;
   Jg_box.recenter box index:(`Num 0)
 
-let add_to_path :dirs ?:base[=""] box =
+let add_to_path :dirs ?(:base="") box =
   let dirs =
     if base = "" then dirs else
     if dirs = [] then [base] else
-- 
cgit v1.2.3-70-g09d2