diff --git a/lisp/minibuffer.el b/lisp/minibuffer.el index d2c3f9045e..a598b1d1fd 100644 --- a/lisp/minibuffer.el +++ b/lisp/minibuffer.el @@ -3585,10 +3585,12 @@ that is non-nil." (pattern (if (not (stringp (car basic-pattern))) basic-pattern (cons 'prefix basic-pattern))) - (pattern (completion-pcm--optimize-pattern - (if transform-pattern-fn - (funcall transform-pattern-fn pattern) - pattern))) + (pattern (append + (completion-pcm--optimize-pattern + (if transform-pattern-fn + (funcall transform-pattern-fn pattern) + pattern)) + '(any))) ; make implicit `any' explicit (all (completion-pcm--all-completions prefix pattern table pred))) (list all pattern prefix suffix (car bounds))))