feat(format): add eglot support

Fix: #7673

modules/editor/format/autoload/format.el

@@ -107,6 +107,23 @@ the requested feature."
        #'lsp-format-region))
     t))
 
+;;;###autoload
+(defun +format-with-eglot-fn (beg end op)
+  "Format the region/buffer using any available eglot formatter.
+
+Does nothing if `+format-with-lsp' is nil or the active server doesn't support
+the requested feature."
+  (when (and +format-with-lsp
+             (bound-and-true-p eglot-managed-mode)
+             (eglot--server-capable
+              (if (eq op 'buffer)
+                  :documentFormattingProvider
+                :documentRangeFormattingProvider)))
+    (if (eq op 'buffer)
+        (eglot-format-buffer)
+      (eglot-format beg end))
+    t))
+
 ;;;###autoload
 (defun +format-in-org-src-blocks-fn (beg end _op)
   "TODO"

modules/editor/format/config.el

@@ -29,7 +29,8 @@ This has no effect on the +onsave flag, apheleia will always be used there.")
 
 (defvar +format-functions
   '(+format-in-org-src-blocks-fn
-    +format-with-lsp-fn)
+    +format-with-lsp-fn
+    +format-with-eglot-fn)
   "A list of functions to run when formatting a buffer or region.
 
 Each function is given three arguments: the starting point, end point, and a