let default_ft_rules_and_handlers =
  [
    "regexp \".*\\\\.ml[ily]?$\"", "OCaml source", [default_editor_command] ;
    "regexp \".*[mM]akefile$\"", "Makefile", [default_editor_command] ;
    "regexp \".*\\\\.in$\"", "Autoconf input file", [default_editor_command] ;
    "regexp \".*\\\\.txt$\"", "Text file", [default_editor_command] ;
    "regexp \".*\\\\.htm[l]?$\"", "HTML file", [default_editor_command] ;
    "regexp \".*\\\\.cvsignore$\"", "CVS ignore file", [default_editor_command] ;
    "regexp \".*\\\\.sch$\"", "DBForge schema", [Printf.sprintf "system %s" Cam_installation.dbforge_gui] ;
    "regexp \".*\\\\.rep$\"", "Report template", [Printf.sprintf "system %s" Cam_installation.report_gui] ;
    "regexp \".*\\\\.rss$\"", "RSS feed", ["open_rss_file"];
  ]