summaryrefslogtreecommitdiff
path: root/lisp/emacs-lisp/easy-mmode.el
diff options
context:
space:
mode:
authorJuanma Barranquero <lekktu@gmail.com>2007-09-26 00:12:23 +0000
committerJuanma Barranquero <lekktu@gmail.com>2007-09-26 00:12:23 +0000
commit9b97ee2e4732fc31187ee110394579eea9b0f422 (patch)
tree22ef4a116c08bc7aef06a7222aefe9254655a0c2 /lisp/emacs-lisp/easy-mmode.el
parent56a1431a050a598a236480d92ce634e65fe0ca38 (diff)
downloademacs-9b97ee2e4732fc31187ee110394579eea9b0f422.tar.gz
(easy-mmode-define-syntax): Use `mapc' rather than `mapcar'.
Diffstat (limited to 'lisp/emacs-lisp/easy-mmode.el')
-rw-r--r--lisp/emacs-lisp/easy-mmode.el2
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/emacs-lisp/easy-mmode.el b/lisp/emacs-lisp/easy-mmode.el
index 80d1625ec9b..8d4274d63a3 100644
--- a/lisp/emacs-lisp/easy-mmode.el
+++ b/lisp/emacs-lisp/easy-mmode.el
@@ -456,7 +456,7 @@ ARGS is a list of additional keyword arguments."
(let ((char (car cs))
(syntax (cdr cs)))
(if (sequencep char)
- (mapcar (lambda (c) (modify-syntax-entry c syntax st)) char)
+ (mapc (lambda (c) (modify-syntax-entry c syntax st)) char)
(modify-syntax-entry char syntax st))))
(if parent (set-char-table-parent
st (if (symbolp parent) (symbol-value parent) parent)))