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

1 files changed, 3 insertions, 2 deletions

diff --git a/lisp/progmodes/c-mode.el b/lisp/progmodes/c-mode.el
index 2529106e7b1..c59efbfd821 100644
--- 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