Mercurial > emacs
changeset 24315:382a7de604b6
(format-replace-strings): Fix value of TO in REVERSE case.
| author | Richard M. Stallman <rms@gnu.org> |
|---|---|
| date | Sun, 14 Feb 1999 06:00:44 +0000 |
| parents | 96aef9174003 |
| children | 4efecaf73aac |
| files | lisp/format.el |
| diffstat | 1 files changed, 1 insertions(+), 1 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/format.el Sat Feb 13 16:40:10 1999 +0000 +++ b/lisp/format.el Sun Feb 14 06:00:44 1999 +0000 @@ -425,7 +425,7 @@ (if end (narrow-to-region (point-min) end)) (while alist (let ((from (if reverse (cdr (car alist)) (car (car alist)))) - (to (if reverse (car (cdr alist)) (cdr (car alist))))) + (to (if reverse (car (car alist)) (cdr (car alist))))) (goto-char beg) (while (search-forward from nil t) (goto-char (match-beginning 0))