diff options
| author | Richard M. Stallman <rms@gnu.org> | 2006-07-24 16:52:57 +0000 |
|---|---|---|
| committer | Richard M. Stallman <rms@gnu.org> | 2006-07-24 16:52:57 +0000 |
| commit | f72f9f1a5822dd2353f773d4dcfbace097611d9c (patch) | |
| tree | 8dec0f8764685606bc8e59408e114158b42a0795 | |
| parent | 41fdf678d891780ff8cbad1f50e51499b32af4dd (diff) | |
| download | emacs-f72f9f1a5822dd2353f773d4dcfbace097611d9c.tar.gz | |
(replace-match-string-symbols): Handle dotted lists.
| -rw-r--r-- | lisp/replace.el | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/replace.el b/lisp/replace.el index 2f8fe86860c..4275aef8d87 100644 --- a/lisp/replace.el +++ b/lisp/replace.el @@ -1283,8 +1283,8 @@ N (match-string N) (where N is a string of digits) # replace-count Note that these symbols must be preceeded by a backslash in order to -type them." - (while n +type them using Lisp syntax." + (while (consp n) (cond ((consp (car n)) (replace-match-string-symbols (car n))) ;Process sub-list |