diff options
| author | Juanma Barranquero | 2007-09-26 00:28:25 +0000 |
|---|---|---|
| committer | Juanma Barranquero | 2007-09-26 00:28:25 +0000 |
| commit | f77183c08323f6682c32fa3b64c5313889df7d2a (patch) | |
| tree | fbfad934e1153dfdf1c7681d7646f73c486cb605 | |
| parent | f24a26a546ef63954fae272f781ada8af459de8a (diff) | |
| download | emacs-f77183c08323f6682c32fa3b64c5313889df7d2a.tar.gz emacs-f77183c08323f6682c32fa3b64c5313889df7d2a.zip | |
(top): Use `mapc' rather than `mapcar'.
| -rw-r--r-- | lisp/progmodes/sql.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/progmodes/sql.el b/lisp/progmodes/sql.el index 1187129bb33..a03b58b466c 100644 --- a/lisp/progmodes/sql.el +++ b/lisp/progmodes/sql.el | |||
| @@ -863,7 +863,7 @@ Based on `comint-mode-map'.") | |||
| 863 | (unless sql-mode-abbrev-table | 863 | (unless sql-mode-abbrev-table |
| 864 | (define-abbrev-table 'sql-mode-abbrev-table nil)) | 864 | (define-abbrev-table 'sql-mode-abbrev-table nil)) |
| 865 | 865 | ||
| 866 | (mapcar | 866 | (mapc |
| 867 | ;; In Emacs 22+, provide SYSTEM-FLAG to define-abbrev. | 867 | ;; In Emacs 22+, provide SYSTEM-FLAG to define-abbrev. |
| 868 | '(lambda (abbrev) | 868 | '(lambda (abbrev) |
| 869 | (let ((name (car abbrev)) | 869 | (let ((name (car abbrev)) |