From: Glenn Morris <rgm@gnu.org> Date: Fri, 12 Oct 2007 03:03:25 +0000 (+0000) Subject: (c-postprocess-file-styles) X-Git-Tag: emacs-pretest-23.0.90~10407 X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=d61ca8d5cc277f0b140fdbe7ecc0b7a19dd98fa8;p=emacs.git (c-postprocess-file-styles) (c-submit-bug-report): Use mapc rather than mapcar. --- diff --git a/lisp/progmodes/cc-mode.el b/lisp/progmodes/cc-mode.el index f234404e81d..00ec64a85a0 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)