X-Git-Url: http://git.onelab.eu/?a=blobdiff_plain;f=backend.ml;h=2f964ef88103172dceee41592d0a0afc103e8021;hb=8e6d6b1bc68769939d544a629936ac58b8a74449;hp=fd648bb1601a4380902ef6db4c86bfff602af95f;hpb=800c304d9ace52d7aa3a1c3398ac043e021da985;p=vsys.git

diff --git a/backend.ml b/backend.ml
index fd648bb..2f964ef 100644
--- a/backend.ml
+++ b/backend.ml
@@ -46,7 +46,7 @@ class backendHandler dir_root (frontend_lst: frontendHandler list) =
 
      (** Regular expression that defines a legal script name. Filter out
        * temporary files using this *)
-     val file_regexp = Str.regexp "[a-zA-Z][a-zA-Z0-9_\.]*"
+     val file_regexp = Str.regexp "^[a-zA-Z][a-zA-Z0-9_\.\-]*$"
      val acl_file_regexp = Str.regexp ".*acl$"
 
      val dir_regexp = Str.regexp "^dir_";