[elpa] externals/corfu db8745f616: Let-bind case-fold-search=nil

[ELPA Syncer]

branch: externals/corfu
commit db8745f616b859266a0b26fbad061bc576b93c27
Author: Daniel Mendler <m...@daniel-mendler.de>
Commit: Daniel Mendler <m...@daniel-mendler.de>

    Let-bind case-fold-search=nil
---
 corfu.el | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/corfu.el b/corfu.el
index 00ce4531d7..c5c55363cb 100644
--- a/corfu.el
+++ b/corfu.el
@@ -645,7 +645,8 @@ FRAME is the existing frame."
 (defun corfu--match-symbol-p (pattern sym)
   "Return non-nil if SYM is matching an element of the PATTERN list."
   (and (symbolp sym)
-       (cl-loop for x in pattern
+       (cl-loop with case-fold-search = nil
+                for x in pattern
                 thereis (if (symbolp x)
                             (eq sym x)
                           (string-match-p x (symbol-name sym))))))