[elpa] externals/eglot 8761f86 11/49: Unbreak eglot-dcase test

[Stefan Monnier]

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

    Unbreak eglot-dcase test
    
    The disambiguation between Command and CodeAction is properly done in
    eglot.el already, by checking the type of the objects involved.  The
    test didn't yet reflect that improvement.
    
    * eglot-tests.el (eglot-dcase): Unbreak test.
---
 eglot-tests.el | 8 +++++---
 1 file changed, 5 insertions(+), 3 deletions(-)

diff --git a/eglot-tests.el b/eglot-tests.el
index e297314..47286a7 100644
--- a/eglot-tests.el
+++ b/eglot-tests.el
@@ -869,7 +869,7 @@ pyls prefers autopep over yafp, despite its README stating 
the contrary."
   (let ((eglot--lsp-interface-alist
          `((FooObject . ((:foo :bar) (:baz)))
            (CodeAction (:title) (:kind :diagnostics :edit :command))
-           (Command (:title :command) (:arguments)))))
+           (Command ((:title . string) (:command . string)) (:arguments)))))
     (should
      (equal
       "foo"
@@ -878,8 +878,10 @@ pyls prefers autopep over yafp, despite its README stating 
the contrary."
          foo))))
     (should
      (equal
-      (list "foo" "some command" "some edit")
-      (eglot--dcase '(:title "foo" :command "some command" :edit "some edit")
+      (list "foo" '(:title "hey" :command "ho") "some edit")
+      (eglot--dcase '(:title "foo"
+                             :command (:title "hey" :command "ho")
+                             :edit "some edit")
         (((Command) _title _command _arguments)
          (ert-fail "Shouldn't have destructured this object as a Command"))
         (((CodeAction) title edit command)