Don't use three-argument plist-get

* eglot.el (eglot-handle-request): Don't use three-argument
plist-get.

GitHub-reference: per https://github.com/joaotavora/eglot/issues/1024

diff --git a/lisp/progmodes/eglot.el b/lisp/progmodes/eglot.el
index 7c1e849389d4fcc5f1cc5792048d97508585630a..0867e43e07f72c433fad7ccc325ec3cea882ac44 100644 (file)
--- a/lisp/progmodes/eglot.el
+++ b/lisp/progmodes/eglot.el
@@ -2285,13 +2285,15 @@ When called interactively, use the currently active server"
                          (project-root (eglot--project server)))))
                 (setq-local major-mode (eglot--major-mode server))
                 (hack-dir-local-variables-non-file-buffer)
-                (plist-get (eglot--workspace-configuration-plist server) section
-                           (lambda (section wsection)
-                             (string=
-                              (if (keywordp wsection)
-                                  (substring (symbol-name wsection) 1)
-                                wsection)
-                              section))))))
+                (cl-loop for (wsection o)
+                         on (eglot--workspace-configuration-plist server)
+                         by #'cddr
+                         when (string=
+                               (if (keywordp wsection)
+                                   (substring (symbol-name wsection) 1)
+                                 wsection)
+                               section)
+                         return o))))
           items)))
 
 (defun eglot--signal-textDocument/didChange ()