let about_dialog = ref (fun () -> raise Not_found)