diff --git a/lisp/progmodes/eglot.el b/lisp/progmodes/eglot.el
index 2f32a8e6eda..f341428cac3 100644
--- a/lisp/progmodes/eglot.el
+++ b/lisp/progmodes/eglot.el
@@ -310,7 +310,10 @@ automatically)."
                                        ("vscode-markdown-language-server" "--stdio"))))
                                 (graphviz-dot-mode . ("dot-language-server" "--stdio"))
                                 (terraform-mode . ("terraform-ls" "serve"))
-                                ((uiua-ts-mode uiua-mode) . ("uiua" "lsp")))
+                                ((uiua-ts-mode uiua-mode) . ("uiua" "lsp"))
+                                (sml-mode
+                                 . ,(lambda (_interactive project)
+                                      (list "millet-ls" (project-root project)))))
   "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