summaryrefslogtreecommitdiff
path: root/lisp/emacs-lisp/sregex.el
diff options
context:
space:
mode:
Diffstat (limited to 'lisp/emacs-lisp/sregex.el')
-rw-r--r--lisp/emacs-lisp/sregex.el2
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/emacs-lisp/sregex.el b/lisp/emacs-lisp/sregex.el
index 94711011317..13274575d1b 100644
--- a/lisp/emacs-lisp/sregex.el
+++ b/lisp/emacs-lisp/sregex.el
@@ -565,7 +565,7 @@ has one of the following forms:
(let ((chars (make-bool-vector 256 nil))) ; Yeah, right!
(dolist (arg args)
(cond ((integerp arg) (aset chars arg t))
- ((stringp arg) (mapcar (lambda (c) (aset chars c t)) arg))
+ ((stringp arg) (mapc (lambda (c) (aset chars c t)) arg))
((consp arg)
(let ((start (car arg))
(end (cdr arg)))