bug#16808: 24.3.50; an error when completing M-x ... commands.

[Andreas Schwab]

Nicolas Richard <theonewiththeevillook@yahoo.fr> writes:

> This is not from emacs -Q, but the patch seems obvious. If you want an
> actual reproducible recipe, I can try to make one.
>
> Here's a diff :
>
> --- a/lisp/minibuffer.el
> +++ b/lisp/minibuffer.el
> @@ -1371,7 +1371,7 @@ appear to be a match."
>                                  (concat before ext after)
>                                  table predicate (1+ point) md))
>                               exts))))
> -       (when (and (= 1 (length comps) (consp (car comps))))
> +       (when (and (= 1 (length comps)) (consp (car comps)))

(= 1 (length comps)) would be better written as (not (cdr comps)) in
this context.

Andreas.

-- 
Andreas Schwab, SUSE Labs, schwab@suse.de
GPG Key fingerprint = 0196 BAD8 1CE9 1970 F4BE  1748 E4D4 88E3 0EEA B9D7
"And now for something completely different."