From d61ca8d5cc277f0b140fdbe7ecc0b7a19dd98fa8 Mon Sep 17 00:00:00 2001 From: Glenn Morris Date: Fri, 12 Oct 2007 03:03:25 +0000 Subject: (c-postprocess-file-styles) (c-submit-bug-report): Use mapc rather than mapcar. --- lisp/progmodes/cc-mode.el | 20 ++++++++++---------- 1 file changed, 10 insertions(+), 10 deletions(-) (limited to 'lisp/progmodes/cc-mode.el') diff --git a/lisp/progmodes/cc-mode.el b/lisp/progmodes/cc-mode.el index f234404e81..00ec64a85a 100644 --- a/lisp/progmodes/cc-mode.el +++ b/lisp/progmodes/cc-mode.el @@ -841,7 +841,7 @@ Note that the style variables are always made local to the buffer." (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 @@ Key bindings: 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) -- cgit v1.2.3