(set-c-style): Ignore case in completion.

diff --git a/lisp/progmodes/c-mode.el b/lisp/progmodes/c-mode.el
index 2529106e7b1f8e261df0707d28775f4d91d42763..c59efbfd821bb29acca27d355510a2925006eee8 100644 (file)
--- a/lisp/progmodes/c-mode.el
+++ b/lisp/progmodes/c-mode.el
@@ -1357,8 +1357,9 @@ The arguments are a string representing the desired style
 and a flag which, if non-nil, means to set the style globally.
 \(Interactively, the flag comes from the prefix argument.)
 Available styles are GNU, K&R, BSD and Whitesmith."
-  (interactive (list (completing-read "Use which C indentation style? "
-                                      c-style-alist nil t)
+  (interactive (list (let ((completion-ignore-case t))
+                      (completing-read "Use which C indentation style? "
+                                       c-style-alist nil t))
                     current-prefix-arg))
   (let ((vars (cdr (assoc style c-style-alist))))
     (or vars