From 545d96a4b16fd2954130826b0248ac105887e415 Mon Sep 17 00:00:00 2001 From: Eshel Yaron Date: Sat, 20 Jan 2024 13:27:08 +0100 Subject: [PATCH] ; Make Eshell completion test more robust --- test/lisp/eshell/em-cmpl-tests.el | 6 ++++-- 1 file changed, 4 insertions(+), 2 deletions(-) diff --git a/test/lisp/eshell/em-cmpl-tests.el b/test/lisp/eshell/em-cmpl-tests.el index f778816c4e1..6f750848581 100644 --- a/test/lisp/eshell/em-cmpl-tests.el +++ b/test/lisp/eshell/em-cmpl-tests.el @@ -183,8 +183,10 @@ ACTUAL and EXPECTED should both be lists of strings." (should-not (get-buffer-window "*Completions*")) ;; Now try completing again. (let ((minibuffer-message-timeout 0) - (inhibit-message t)) - (completion-at-point)) + (inhibit-message t) + (last-command 'completion-at-point) + (completion-auto-help t)) + (call-interactively #'completion-at-point)) ;; This time, we should display the completions buffer. (should (get-buffer-window "*Completions*"))))) -- 2.39.5