Mercurial > emacs
changeset 72095:2a66d3b6c808
(replace-match-string-symbols): Handle dotted lists.
author | Richard M. Stallman <rms@gnu.org> |
---|---|
date | Mon, 24 Jul 2006 16:52:57 +0000 |
parents | 7da1e62f312e |
children | 74ec3b24ac69 |
files | lisp/replace.el |
diffstat | 1 files changed, 2 insertions(+), 2 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/replace.el Mon Jul 24 16:27:17 2006 +0000 +++ b/lisp/replace.el Mon Jul 24 16:52:57 2006 +0000 @@ -1283,8 +1283,8 @@ # 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