# HG changeset patch
# User Sam Steingold <sds@gnu.org>
# Date 1006809329 0
# Node ID b89d0c514129088cb044eae709b158e2949bd780
# Parent  7c12657b7a8cdaa654221a03122929872a00902b
(c-submit-bug-report): Make sure that the arguments to `insert' are strings.

diff -r 7c12657b7a8c -r b89d0c514129 lisp/ChangeLog
--- a/lisp/ChangeLog	Mon Nov 26 20:16:17 2001 +0000
+++ b/lisp/ChangeLog	Mon Nov 26 21:15:29 2001 +0000
@@ -1,3 +1,8 @@
+2001-11-26  Sam Steingold  <sds@gnu.org>
+
+	* progmodes/cc-mode.el (c-submit-bug-report): Make sure that the
+	arguments to `insert' are strings.
+
 2001-11-26  Richard M. Stallman  <rms@gnu.org>
 
 	* startup.el (command-line-1): Call kill-buffer only in non-fancy case.
diff -r 7c12657b7a8c -r b89d0c514129 lisp/progmodes/cc-mode.el
--- a/lisp/progmodes/cc-mode.el	Mon Nov 26 20:16:17 2001 +0000
+++ b/lisp/progmodes/cc-mode.el	Mon Nov 26 21:15:29 2001 +0000
@@ -385,12 +385,10 @@
        (c-set-style c-file-style))
   (and c-file-offsets
        (mapcar
-	(function
-	 (lambda (langentry)
-	   (let ((langelem (car langentry))
-		 (offset (cdr langentry)))
-	     (c-set-offset langelem offset)
-	     )))
+        (lambda (langentry)
+          (let ((langelem (car langentry))
+                (offset (cdr langentry)))
+            (c-set-offset langelem offset)))
 	c-file-offsets)))
 
 (add-hook 'hack-local-variables-hook 'c-postprocess-file-styles)
@@ -893,13 +891,10 @@
 		  filladapt-mode
 		  defun-prompt-regexp))
 	vars)
-      (function
-       (lambda ()
-	 (run-hooks 'c-prepare-bug-report-hooks)
-	 (insert
-	  "Buffer Style: " style "\n\n"
-	  (format "c-emacs-features: %s\n" c-features)
-	  )))))))
+      (lambda ()
+        (run-hooks 'c-prepare-bug-report-hooks)
+        (insert (format "Buffer Style: %s\n\nc-emacs-features: %s\n"
+                        style c-features)))))))
 
 
 (cc-provide 'cc-mode)