Bugfix in matitaFilesystem.ml

[helm.git] / matitaB / matita / matitaFilesystem.ml

diff --git a/matitaB/matita/matitaFilesystem.ml b/matitaB/matita/matitaFilesystem.ml
index df4d4f844758822ee5ec5acdc0100c05170da813..346598743784366c693010e0fd01743517af01ba 100644 (file)
--- a/matitaB/matita/matitaFilesystem.ml
+++ b/matitaB/matita/matitaFilesystem.ml
@@ -53,7 +53,7 @@ let checkout user =
   let repo = Helm_registry.get "matita.weblib" in
 
   let errno, outstr = exec_process 
-    ("svn co " ^ repo ^ " " ^ rt_dir ^ "/users/" ^ user ^ "/scripts")
+    ("svn co " ^ repo ^ " " ^ rt_dir ^ "/users/" ^ user ^ "/")
   in
   if errno = 0 then ()
   else raise (SvnError outstr)