Fixed wrong case completions.

[gnu-emacs-elpa] / company-keywords.el

diff --git a/company-keywords.el b/company-keywords.el
index 4bddd8383f8beb3853d968ea2284eb4948dbd6eb..7e1698c0a20fd1229ff443ea4799192f87cfb0b0 100644 (file)
--- a/company-keywords.el
+++ b/company-keywords.el
@@ -149,7 +149,7 @@
                   (not (company-in-string-or-comment))
                   (or (company-grab-symbol) 'stop)))
     ('candidates
-     (let ((case-fold-search nil)
+     (let ((completion-ignore-case nil)
            (symbols (cdr (assq major-mode company-keywords-alist))))
        (all-completions arg (if (consp symbols)
                                 symbols