1
0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2024-11-23 07:19:15 +00:00

(top): Use mapc' rather than mapcar'.

This commit is contained in:
Juanma Barranquero 2007-09-26 00:30:33 +00:00
parent 51b5ad576f
commit e2c527c579

View File

@ -101,17 +101,17 @@ from being inserted into the process-buffer.")
(setq-default scheme-mode-line-process
'("" xscheme-runlight))
(mapcar 'make-variable-buffer-local
'(xscheme-expressions-ring
xscheme-expressions-ring-yank-pointer
xscheme-process-filter-state
xscheme-running-p
xscheme-control-g-disabled-p
xscheme-allow-output-p
xscheme-prompt
xscheme-string-accumulator
xscheme-mode-string
scheme-mode-line-process))
(mapc 'make-variable-buffer-local
'(xscheme-expressions-ring
xscheme-expressions-ring-yank-pointer
xscheme-process-filter-state
xscheme-running-p
xscheme-control-g-disabled-p
xscheme-allow-output-p
xscheme-prompt
xscheme-string-accumulator
xscheme-mode-string
scheme-mode-line-process))
(defgroup xscheme nil
"Major mode for editing Scheme and interacting with MIT's C-Scheme."