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.el4
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/emacs-lisp/sregex.el b/lisp/emacs-lisp/sregex.el
index 94711011317..215245dbc75 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)))
@@ -606,5 +606,5 @@ has one of the following forms:
(provide 'sregex)
-;;; arch-tag: 460c1f5a-eb6e-42ec-a451-ffac78bdf492
+;; arch-tag: 460c1f5a-eb6e-42ec-a451-ffac78bdf492
;;; sregex.el ends here