company-files--complete: Ignore case on appropriate systems

#240

diff --git a/company-files.el b/company-files.el
index baaeaca4bd853650f670f1691d4f7e8b5a20dd79..7cfc500751a1c22a4eacc74afa0a29753b893b73 100644 (file)
--- a/company-files.el
+++ b/company-files.el
@@ -64,6 +64,7 @@
                     (expand-file-name dir)
                     (nth 5 (file-attributes dir))))
          (file (file-name-nondirectory prefix))
+         (completion-ignore-case read-file-name-completion-ignore-case)
          candidates directories)
     (unless (company-file--keys-match-p key (car company-files--completion-cache))
       (dolist (file (company-files--directory-files dir file))