let ocaml_syntax_mode_installed () = let lm = Ed_sourceview.languages_manager in let l = lm#get_available_languages in List.exists (fun l -> String.lowercase l#get_name = "objective caml") l