# HG changeset patch
# User Karl Heuer <kwzh@gnu.org>
# Date 790572035 0
# Node ID 14c7b7749f454edf3c3367a5ccb7b260b091ae43
# Parent  5906e2f35eb93764169ebf6d4137703a7f21b6ba
(set-c-style): Ignore case in completion.

diff -r 5906e2f35eb9 -r 14c7b7749f45 lisp/progmodes/c-mode.el
--- a/lisp/progmodes/c-mode.el	Fri Jan 20 02:50:27 1995 +0000
+++ b/lisp/progmodes/c-mode.el	Fri Jan 20 03:20:35 1995 +0000
@@ -1357,8 +1357,9 @@
 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