changeset 85185:264b4ccf31a8

(c-postprocess-file-styles) (c-submit-bug-report): Use mapc rather than mapcar.
author Glenn Morris <rgm@gnu.org>
date Fri, 12 Oct 2007 03:03:25 +0000
parents 025303f3b74d
children 20ca9ea6e1d1
files lisp/progmodes/cc-mode.el
diffstat 1 files changed, 10 insertions(+), 10 deletions(-) [+]
line wrap: on
line diff
--- 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)