mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2025-12-06 06:20:55 -08:00
Code Issues Projects Releases Wiki Activity

eglot-test-rust-completion-exit-function: Fix failure in -Q session

Browse source 
* test/lisp/progmodes/eglot-tests.el (eglot--call-with-fixture):
Check for buffer liveness (https://debbugs.gnu.org/72765#29).
(eglot-test-rust-completion-exit-function): Don't expect snippet
expansion to happen (no yasnippet in batch mode).
This commit is contained in:
Dmitry Gutov 2024-09-10 04:34:53 +03:00
parent f47297782b
commit 818c0cc9a5
1 changed files with 6 additions and 4 deletions
Download patch file Download diff file Expand all files Collapse all files

10
test/lisp/progmodes/eglot-tests.el
View file

@ -136,9 +136,11 @@ directory hierarchy."
(jsonrpc-events-buffer server))))) (jsonrpc-events-buffer server)))))
(cond (noninteractive (cond (noninteractive
(dolist (buffer buffers) (dolist (buffer buffers)
(eglot--test-message "contents of `%s':" (buffer-name buffer)) (eglot--test-message "contents of `%s' %S:" (buffer-name buffer) buffer)
(princ (with-current-buffer buffer (buffer-string)) (if (buffer-live-p buffer)
'external-debugging-output))) (princ (with-current-buffer buffer (buffer-string))
'external-debugging-output)
(princ "Killed\n" #'external-debugging-output))))
(t (t
(eglot--test-message "Preserved for inspection: %s" (eglot--test-message "Preserved for inspection: %s"
(mapconcat #'buffer-name buffers ", ")))))))) (mapconcat #'buffer-name buffers ", "))))))))
@ -724,7 +726,7 @@ directory hierarchy."
(minibuffer-choose-completion t)) (minibuffer-choose-completion t))
(should (should
(equal (equal
"fn test() -> i32 { let v: usize = 1; v.count_ones().1234567890;" "fn test() -> i32 { let v: usize = 1; v.count_ones.1234567890;"
(buffer-string)))))) (buffer-string))))))
(ert-deftest eglot-test-basic-xref () (ert-deftest eglot-test-basic-xref ()