eglot: Add blueprint language server (Bug#70015)

* lisp/progmodes/eglot.el (eglot-server-programs): Add
blueprint-compiler.

(cherry picked from commit d1d031aea69b3ab45034716048a2592fcbfd7358)

diff --git a/lisp/progmodes/eglot.el b/lisp/progmodes/eglot.el
index 4da18845edce910c322dedf7f8d86907ad1e906f..bb915fb4a91be3f5ebd8a92a369af81caa14d1bf 100644 (file)
--- a/lisp/progmodes/eglot.el
+++ b/lisp/progmodes/eglot.el
@@ -332,7 +332,8 @@ automatically)."
     ((uiua-ts-mode uiua-mode) . ("uiua" "lsp"))
     (sml-mode
      . ,(lambda (_interactive project)
-          (list "millet-ls" (project-root project)))))
+          (list "millet-ls" (project-root project))))
+    ((blueprint-mode blueprint-ts-mode) . ("blueprint-compiler" "lsp")))
   "How the command `eglot' guesses the server to start.
 An association list of (MAJOR-MODE . CONTACT) pairs.  MAJOR-MODE
 identifies the buffers that are to be managed by a specific