; completion-pcm-bug80914: Only look at the car of the list.

Avoids ordering issues.
This commit is contained in:
Spencer Baugh 2026-07-10 13:04:00 +01:00 committed by Sean Whitton
parent 8e5c0386f1
commit d0bd9b39a3

View file

@ -349,11 +349,9 @@
(input "pcm/s/cl"))
;; The pattern has a single `point' at the end rather than an extra
;; `point' after the "s".
(should (equal (completion-pcm--find-all-completions
input #'completion--file-name-table nil (length input))
'(("s" any "/" "cl" point)
("sources/clang" "sys/class")
"pcm/" "")))))
(should (equal (car (completion-pcm--find-all-completions
input #'completion--file-name-table nil (length input)))
'("s" any "/" "cl" point)))))
(ert-deftest completion-initials ()
;; Should expand initials: