(c-submit-bug-report): Make sure that the arguments to `insert' are strings.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index ae475fa71cda89e45064be705df5c1fe2fa5a11f..5838b7c244e3561312286bbd4d9a5a0ab7a7cd5f 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -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 --git a/lisp/progmodes/cc-mode.el b/lisp/progmodes/cc-mode.el
index 0ac23c85c27509bb0b5f204208de3c4e479582ed..6c80702864c55262d062357a57061a1e63f9eb04 100644 (file)
--- a/lisp/progmodes/cc-mode.el
+++ b/lisp/progmodes/cc-mode.el
@@ -385,12 +385,10 @@ Note that the style variables are always made local to the buffer."
        (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 @@ CC Mode by making sure the proper entries are present on
                  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)))))))
 
 \f
 (cc-provide 'cc-mode)