let filename_language_patterns =
  new CF.list_cp ~group
    (CF.tuple2_wrappers CF.string_wrappers CF.string_wrappers)
    ["language_mime_from_filename_patterns"]
    default_filename_language_patterns
    ("Associations between regular expressions on filename and the "^
     "mime type used to get the language highlight to use in buffer")