From: Karl Heuer <kwzh@gnu.org>
Date: Fri, 20 Jan 1995 03:20:35 +0000 (+0000)
Subject: (set-c-style): Ignore case in completion.
X-Git-Tag: emacs-19.34~5368
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=389817fd6c176249396d248818bbb1e7591e02d3;p=emacs.git

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

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