ocamllsp: prepare for filetype to language_id translation

1 files changed, 15 insertions, 1 deletions

diff --git a/lua/lspconfig/ocamllsp.lua b/lua/lspconfig/ocamllsp.lua
index 155ec1c8..c588b39d 100644
--- a/lua/lspconfig/ocamllsp.lua
+++ b/lua/lspconfig/ocamllsp.lua
@@ -1,11 +1,25 @@
 local configs = require 'lspconfig/configs'
 local util = require 'lspconfig/util'
 
+local language_id_of = {
+  ocaml = 'ocaml';
+  reason = 'reason';
+}
+
+local filetypes = {}
+
+for ftype, _ in pairs(language_id_of) do
+  table.insert(filetypes, ftype)
+end
+
+local get_language_id = function (_, ftype) return language_id_of[ftype] end
+
 configs.ocamllsp = {
   default_config = {
     cmd = {"ocamllsp",};
-    filetypes = {'ocaml', 'reason'};
+    filetypes = filetypes;
     root_dir = util.root_pattern("*.opam", "esy.json", "package.json", ".git");
+    get_language_id = get_language_id;
   };
   docs = {
     description = [[