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

This commit is contained in:
Juanma Barranquero 2007-09-26 00:28:25 +00:00
parent f24a26a546
commit f77183c083

View file

@ -863,7 +863,7 @@ Based on `comint-mode-map'.")
(unless sql-mode-abbrev-table
(define-abbrev-table 'sql-mode-abbrev-table nil))
(mapcar
(mapc
;; In Emacs 22+, provide SYSTEM-FLAG to define-abbrev.
'(lambda (abbrev)
(let ((name (car abbrev))