[elpa] externals/eglot b9b4d8342b 2/2: Make eglot--plist-keys a simple (non-map.el) helper again

[ELPA Syncer]

branch: externals/eglot
commit b9b4d8342b7dedec15b8dee5b16ccae4c82e9fce
Author: João Távora <joaotavora@gmail.com>
Commit: João Távora <joaotavora@gmail.com>

    Make eglot--plist-keys a simple (non-map.el) helper again
    
    This removes a nagging compilation warning when developing on Emacs
    master.
    
    There's not much point in depending on map.el just for this util.  And
    there' snot much point in making eglot--plist-keys go through a
    generic dispatching mechanism when we happen to know the thing
    being dispatched
    
    * eglot.el (eglot--plist-keys): Define in helpers section.
---
 eglot.el | 10 +++-------
 1 file changed, 3 insertions(+), 7 deletions(-)

diff --git a/eglot.el b/eglot.el
index 86e798fabd..f739a0d34d 100644
--- a/eglot.el
+++ b/eglot.el
@@ -1550,6 +1550,9 @@ and just return it.  PROMPT shouldn't end with a question 
mark."
   "Tell if SERVER's project root is `file-remote-p'."
   (file-remote-p (project-root (eglot--project server))))
 
+(defun eglot--plist-keys (plist) "Get keys of a plist."
+  (cl-loop for (k _v) on plist by #'cddr collect k))
+
 
 ;;; Minor modes
 ;;;
@@ -3078,13 +3081,6 @@ If NOERROR, return predicate, else erroring function."
 
 (make-obsolete-variable 'eglot--managed-mode-hook
                         'eglot-managed-mode-hook "1.6")
-
-(if (< emacs-major-version 27)
-    (defun eglot--plist-keys (plist)
-      (cl-loop for (k _v) on plist by #'cddr collect k))
-  ;; Make into an obsolete alias once we drop support for Emacs 26.
-  (defalias 'eglot--plist-keys #'map-keys))
-
 (provide 'eglot)
 
 ;; Local Variables: