diff options
| author | Miles Bader <miles@gnu.org> | 2007-10-11 16:22:07 +0000 |
|---|---|---|
| committer | Miles Bader <miles@gnu.org> | 2007-10-11 16:22:07 +0000 |
| commit | 90c1c829ff9f08fd7d872e0099b587268727a23f (patch) | |
| tree | 36c685ef2aecf32203747dd40d7800aae78fba9f /lisp/emacs-lisp/sregex.el | |
| parent | 41520ab0b3f0a0ae6bd81731f67eb43cf23500d8 (diff) | |
| parent | 39e55877e2bfca874f1640302fec16ded1bbf7d3 (diff) | |
| download | emacs-90c1c829ff9f08fd7d872e0099b587268727a23f.tar.gz | |
Merge from emacs--devo--0
Patches applied:
* emacs--devo--0 (patch 866-879)
- Merge multi-tty branch
- Update from CVS
- Merge from emacs--rel--22
Revision: emacs@sv.gnu.org/emacs--unicode--0--patch-257
Diffstat (limited to 'lisp/emacs-lisp/sregex.el')
| -rw-r--r-- | lisp/emacs-lisp/sregex.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/emacs-lisp/sregex.el b/lisp/emacs-lisp/sregex.el index 901156cefc3..d4deb0f9101 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))) |