X-Git-Url: http://git.onelab.eu/?a=blobdiff_plain;f=backend.ml;h=4d243266598bc5a18bd130359612fb4a60657d9d;hb=59b750289e2b4e75e8a661045b16ce053326671d;hp=6bf6796981b99833fb2919392a47640d84eb4aea;hpb=46e48c60e9d524bf71631561e193c443613a2bb5;p=vsys.git diff --git a/backend.ml b/backend.ml index 6bf6796..4d24326 100644 --- a/backend.ml +++ b/backend.ml @@ -84,7 +84,7 @@ class backendHandler dir_root (frontend_lst: frontendHandler list) = with _ -> None in match next_item with - | None -> cur_filter + | None -> close_in acl_file;cur_filter | Some(item) -> Hashtbl.add cur_filter item true; read_acl cur_filter