method private new_script slice_list fqp =
       let s = Unix.stat fqp in
         List.iter (fun frontend->
                      frontend#mkentry (mk_rel_path fqp) fqp (s.st_perm)) 
                   slice_list