changeset 10490:14c7b7749f45

(set-c-style): Ignore case in completion.
author Karl Heuer <kwzh@gnu.org>
date Fri, 20 Jan 1995 03:20:35 +0000
parents 5906e2f35eb9
children dfc0d2c81c56
files lisp/progmodes/c-mode.el
diffstat 1 files changed, 3 insertions(+), 2 deletions(-) [+]
line wrap: on
line diff
--- 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