diff options
| author | Juanma Barranquero | 2007-09-26 00:30:33 +0000 |
|---|---|---|
| committer | Juanma Barranquero | 2007-09-26 00:30:33 +0000 |
| commit | e2c527c5794cb714731ad6b062d871f5100bbbf4 (patch) | |
| tree | 4df4ee3af6f01d2a6e2be350fb81c259f0c07b22 | |
| parent | 51b5ad576f72385d2a62baaedccaae04c78535ab (diff) | |
| download | emacs-e2c527c5794cb714731ad6b062d871f5100bbbf4.tar.gz emacs-e2c527c5794cb714731ad6b062d871f5100bbbf4.zip | |
(top): Use `mapc' rather than `mapcar'.
| -rw-r--r-- | lisp/progmodes/xscheme.el | 22 |
1 files changed, 11 insertions, 11 deletions
diff --git a/lisp/progmodes/xscheme.el b/lisp/progmodes/xscheme.el index a820ca4cede..f437bb7da37 100644 --- a/lisp/progmodes/xscheme.el +++ b/lisp/progmodes/xscheme.el | |||
| @@ -101,17 +101,17 @@ from being inserted into the process-buffer.") | |||
| 101 | (setq-default scheme-mode-line-process | 101 | (setq-default scheme-mode-line-process |
| 102 | '("" xscheme-runlight)) | 102 | '("" xscheme-runlight)) |
| 103 | 103 | ||
| 104 | (mapcar 'make-variable-buffer-local | 104 | (mapc 'make-variable-buffer-local |
| 105 | '(xscheme-expressions-ring | 105 | '(xscheme-expressions-ring |
| 106 | xscheme-expressions-ring-yank-pointer | 106 | xscheme-expressions-ring-yank-pointer |
| 107 | xscheme-process-filter-state | 107 | xscheme-process-filter-state |
| 108 | xscheme-running-p | 108 | xscheme-running-p |
| 109 | xscheme-control-g-disabled-p | 109 | xscheme-control-g-disabled-p |
| 110 | xscheme-allow-output-p | 110 | xscheme-allow-output-p |
| 111 | xscheme-prompt | 111 | xscheme-prompt |
| 112 | xscheme-string-accumulator | 112 | xscheme-string-accumulator |
| 113 | xscheme-mode-string | 113 | xscheme-mode-string |
| 114 | scheme-mode-line-process)) | 114 | scheme-mode-line-process)) |
| 115 | 115 | ||
| 116 | (defgroup xscheme nil | 116 | (defgroup xscheme nil |
| 117 | "Major mode for editing Scheme and interacting with MIT's C-Scheme." | 117 | "Major mode for editing Scheme and interacting with MIT's C-Scheme." |