summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorChong Yidong <cyd@gnu.org>2013-12-20 14:11:00 +0800
committerChong Yidong <cyd@gnu.org>2013-12-20 14:11:00 +0800
commita9574eb7306c56e68ad4c20d58f419b317902f1a (patch)
treeacbbf48051ff82b5b02974bcd1fe866bfa480498
parenta2f5f4319321478cbfd4b26f9c6e7d4de776ae26 (diff)
downloademacs-a9574eb7306c56e68ad4c20d58f419b317902f1a.tar.gz
* faces.el (read-color): Minor fix for completion function.
-rw-r--r--lisp/ChangeLog4
-rw-r--r--lisp/faces.el2
2 files changed, 5 insertions, 1 deletions
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 <cyd@gnu.org>
+
+ * faces.el (read-color): Minor fix for completion function.
+
2013-12-20 Dmitry Gutov <dgutov@yandex.ru>
* 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)))