diff options
author | Nicolas Richard <theonewiththeevillook@yahoo.fr> | 2014-02-24 16:41:46 +0100 |
---|---|---|
committer | Juanma Barranquero <lekktu@gmail.com> | 2014-02-24 16:41:46 +0100 |
commit | 0e38ae052eb194ac509b77ba9be4b0ab70c784f4 (patch) | |
tree | cfe4f94ea7cf74eea2c19dbe855459d5680cda92 /lisp/minibuffer.el | |
parent | 7c56ecf5f550703a28831c8ac8de940cc7d88599 (diff) | |
download | emacs-0e38ae052eb194ac509b77ba9be4b0ab70c784f4.tar.gz emacs-0e38ae052eb194ac509b77ba9be4b0ab70c784f4.tar.bz2 emacs-0e38ae052eb194ac509b77ba9be4b0ab70c784f4.zip |
lisp/minibuffer.el: Fix bug#16808.
(completion--try-word-completion): Fix error when completing M-x commands.
Diffstat (limited to 'lisp/minibuffer.el')
-rw-r--r-- | lisp/minibuffer.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/minibuffer.el b/lisp/minibuffer.el index edc4c950104..737172e359f 100644 --- 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 (null (cdr comps)) (consp (car comps))) (setq comp (car comps))))) ;; Completing a single word is actually more difficult than completing |