method private new_dir slice_list fqp func =
let s = Unix.stat fqp in
List.iter
(fun frontend->
try begin
frontend#mkdir (mk_rel_path fqp) (s.st_perm);
Dirwatcher.add_watch fqp [S_Create;S_Delete] func
end
with _ ->
logprint "Could not create %s. Looks like a slice shot itself in the foot\n" fqp;
)
slice_list