changeset 41592:b89d0c514129

(c-submit-bug-report): Make sure that the arguments to `insert' are strings.
author Sam Steingold <sds@gnu.org>
date Mon, 26 Nov 2001 21:15:29 +0000
parents 7c12657b7a8c
children bc65be224d92
files lisp/ChangeLog lisp/progmodes/cc-mode.el
diffstat 2 files changed, 13 insertions(+), 13 deletions(-) [+]
line wrap: on
line diff
--- 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.
--- 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)