Fix bugs with inappropriate mixing of Lisp_Object with int.

[bpt/emacs.git] / src / minibuf.c

diff --git a/src/minibuf.c b/src/minibuf.c
index a4dd937..4a2c805 100644 (file)
--- a/src/minibuf.c
+++ b/src/minibuf.c
@@ -956,7 +956,7 @@ scmp (s1, s2, len)
 
   if (completion_ignore_case)
     {
-      while (l && EQ (DOWNCASE (*s1++), DOWNCASE (*s2++)))
+      while (l && DOWNCASE (*s1++) == DOWNCASE (*s2++))
        l--;
     }
   else