company-dabbrev-code: use case-fold-search

e7c7ba09d9b0bd859b0561009be5eab5020593ed was only half right.

diff --git a/company-dabbrev-code.el b/company-dabbrev-code.el
index 64f60c791130b0e591fb3c68a60ce4043425566f..b98c17d370f6ffe564c4446fc4c7592d5f315004 100644 (file)
--- a/company-dabbrev-code.el
+++ b/company-dabbrev-code.el
@@ -78,7 +78,7 @@ comments or strings."
                      (apply 'derived-mode-p company-dabbrev-code-modes))
                  (not (company-in-string-or-comment))
                  (or (company-grab-symbol) 'stop)))
-    (candidates (let ((completion-ignore-case nil))
+    (candidates (let ((case-fold-search nil))
                   (company-dabbrev--search
                    (company-dabbrev-code--make-regexp arg)
                    company-dabbrev-code-time-limit