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

Previous Next

Package: emacs;

Reported by: Knut Anders Hatlen <kahatlen <at> gmail.com>

Date: Thu, 29 Dec 2022 21:26:02 UTC

Severity: normal

Fixed in version 29.0.60

Done: Juri Linkov <juri <at> linkov.net>

Bug is archived. No further changes may be made.

Full log


View this message in rfc822 format

From: Juri Linkov <juri <at> linkov.net>
To: Gregory Heytings <gregory <at> heytings.org>
Cc: kahatlen <at> gmail.com, Eli Zaretskii <eliz <at> gnu.org>, 60411 <at> debbugs.gnu.org, monnier <at> iro.umontreal.ca
Subject: bug#60411: 29.0.60; minibuffer-next-completion skips first candidate when completions-header-format and completion-show-help are nil
Date: Thu, 12 Jan 2023 19:48:17 +0200
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.




This bug report was last modified 2 years and 130 days ago.

Previous Next


GNU bug tracking system
Copyright (C) 1999 Darren O. Benham, 1997,2003 nCipher Corporation Ltd, 1994-97 Ian Jackson.