# HG changeset patch # User Richard M. Stallman # Date 1153759977 0 # Node ID 2a66d3b6c808c322b84e46e7c0e2c5aecbbdbcee # Parent 7da1e62f312e55be6bbdcf8260237e31ec8b7650 (replace-match-string-symbols): Handle dotted lists. diff -r 7da1e62f312e -r 2a66d3b6c808 lisp/replace.el --- 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