update in binaries for λδ

[helm.git] / matita / matita / contribs / lambdadelta / bin / roles / rolesGlobal.ml

diff --git a/matita/matita/contribs/lambdadelta/bin/roles/rolesGlobal.ml b/matita/matita/contribs/lambdadelta/bin/roles/rolesGlobal.ml
index 6a4c37369d60efcda193ca9705cae32beaa2647a..466c68f27f32a094a88b45e9967b4637e4aff515 100644 (file)
--- a/matita/matita/contribs/lambdadelta/bin/roles/rolesGlobal.ml
+++ b/matita/matita/contribs/lambdadelta/bin/roles/rolesGlobal.ml
@@ -11,17 +11,17 @@
 
 let default_base_url = "http://helm.cs.unibo.it/lambdadelta/"
 
-let default_wd = ""
+let default_cwd = Filename.dirname Sys.argv.(0)
 
 let default_debug_lexer = false
 
 let base_url = ref default_base_url
 
-let wd = ref default_wd
+let cwd = ref default_cwd
 
 let debug_lexer = ref default_debug_lexer
 
 let clear () =
   base_url := default_base_url;
-  wd := default_wd;
+  cwd := default_cwd;
   debug_lexer := default_debug_lexer