# HG changeset patch
# User Glenn Morris <rgm@gnu.org>
# Date 1192158205 0
# Node ID 264b4ccf31a8744d59669516640e098c31164143
# Parent  025303f3b74d425ff07a2f4431ab321cd5debd47
(c-postprocess-file-styles)
(c-submit-bug-report): Use mapc rather than mapcar.

diff -r 025303f3b74d -r 264b4ccf31a8 lisp/progmodes/cc-mode.el
--- a/lisp/progmodes/cc-mode.el	Fri Oct 12 03:01:13 2007 +0000
+++ b/lisp/progmodes/cc-mode.el	Fri Oct 12 03:03:25 2007 +0000
@@ -841,7 +841,7 @@
     (and c-file-style
 	 (c-set-style c-file-style))
     (and c-file-offsets
-	 (mapcar
+	 (mapc
 	  (lambda (langentry)
 	    (let ((langelem (car langentry))
 		  (offset (cdr langentry)))
@@ -1430,15 +1430,15 @@
 		     adaptive-fill-mode
 		     adaptive-fill-regexp)
 		   nil)))
-	(mapcar (lambda (var) (unless (boundp var)
-				(setq vars (delq var vars))))
-		'(signal-error-on-buffer-boundary
-		  filladapt-mode
-		  defun-prompt-regexp
-		  font-lock-mode
-		  font-lock-maximum-decoration
-		  parse-sexp-lookup-properties
-		  lookup-syntax-properties))
+	(mapc (lambda (var) (unless (boundp var)
+			      (setq vars (delq var vars))))
+	      '(signal-error-on-buffer-boundary
+		filladapt-mode
+		defun-prompt-regexp
+		font-lock-mode
+		font-lock-maximum-decoration
+		parse-sexp-lookup-properties
+		lookup-syntax-properties))
 	vars)
       (lambda ()
 	(run-hooks 'c-prepare-bug-report-hooks)