From a9574eb7306c56e68ad4c20d58f419b317902f1a Mon Sep 17 00:00:00 2001 From: Chong Yidong Date: Fri, 20 Dec 2013 14:11:00 +0800 Subject: [PATCH] * faces.el (read-color): Minor fix for completion function. --- lisp/ChangeLog | 4 ++++ lisp/faces.el | 2 +- 2 files changed, 5 insertions(+), 1 deletion(-) diff --git a/lisp/ChangeLog b/lisp/ChangeLog index bf446bc7b66..416f9a8b685 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,7 @@ +2013-12-20 Chong Yidong + + * faces.el (read-color): Minor fix for completion function. + 2013-12-20 Dmitry Gutov * progmodes/ruby-mode.el (ruby-align-to-stmt-keywords): New diff --git a/lisp/faces.el b/lisp/faces.el index 3797056b167..14be52a717c 100644 --- a/lisp/faces.el +++ b/lisp/faces.el @@ -1836,7 +1836,7 @@ resulting color name in the echo area." (if (color-defined-p string) (list string)))) ((eq flag 'lambda) ; Test completion. - (or (memq string colors) + (or (member string colors) (color-defined-p string))))) nil t))) -- 2.39.2