let find_script_for_keywords keys = loadscripts () ; Hashtbl.fold (fun _ (xs,p) scripts -> let h = suitable 0 xs keys in if h>0 then List.merge most_suitable [h,p] scripts else scripts) scriptbase []