Mercurial > emacs
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)