diff lisp/replace.el @ 235:85a06df23a9a r20-5b16

Import from CVS: tag r20-5b16
author cvs
date Mon, 13 Aug 2007 10:14:40 +0200
parents 41ff10fd062f
children c42ec1d1cded
line wrap: on
line diff
--- a/lisp/replace.el	Mon Aug 13 10:14:17 2007 +0200
+++ b/lisp/replace.el	Mon Aug 13 10:14:40 2007 +0200
@@ -93,7 +93,7 @@
 	(save-excursion
 	  (narrow-to-region (point) (mark))
 	  (goto-char (point-min))
-	  (query-replace from-string to-string arg)))
+	  (perform-replace from-string to-string t nil arg)))
     (perform-replace from-string to-string t nil arg)))
 
 (defun query-replace-regexp (regexp to-string &optional arg)