# HG changeset patch
# User Richard M. Stallman <rms@gnu.org>
# Date 993313324 0
# Node ID 728d49350f43c2ca7627b0507c29985b205f5563
# Parent  4e1eed1dee4e8254a40842592513227dce2909ed
(c-set-style): Don't specify initial contents for completing-read.

diff -r 4e1eed1dee4e -r 728d49350f43 lisp/progmodes/cc-styles.el
--- a/lisp/progmodes/cc-styles.el	Sat Jun 23 16:19:29 2001 +0000
+++ b/lisp/progmodes/cc-styles.el	Sat Jun 23 16:22:04 2001 +0000
@@ -302,8 +302,9 @@
 			   (prompt (format "Which %s indentation style? "
 					   mode-name)))
 		       (completing-read prompt c-style-alist nil t
-					(cons c-indentation-style 0)
-					'c-set-style-history))))
+					nil
+					'c-set-style-history
+					c-indentation-style))))
   (c-initialize-builtin-style)
   (let ((vars (c-get-style-variables stylename nil)))
     (mapcar (lambda (elem)