bug#60411: 29.0.60; minibuffer-next-completion skips first candidate when completions-header-format and completion-show-help are nil

[Juri Linkov]

close 60411 29.0.60
thanks

> diff --git a/lisp/simple.el b/lisp/simple.el
> index 63479e9ce0..0221881641 100644
> --- a/lisp/simple.el
> +++ b/lisp/simple.el
> @@ -9698,6 +9698,14 @@ next-completion
>    (let ((tabcommand (member (this-command-keys) '("\t" [backtab])))
>          pos)
>      (catch 'bound
> +      (when (and (bobp)
> +                 (> n 0)
> +                 (get-text-property (point) 'mouse-face)
> +                 (not (get-text-property (point) 'first-completion)))
> +        (let ((inhibit-read-only t))
> +          (add-text-properties (point) (1+ (point)) '(first-completion t)))
> +        (setq n (1- n)))
> +
>        (while (> n 0)
>          (setq pos (point))
>          ;; If in a completion, move to the end of it.

Thanks, now pushed to emacs-29 and closed.