diff lisp/replace.el @ 38986:56099fbee0b3

(query-replace-regexp-eval): Return args from `interactive' form in correct order.

--- a/lisp/replace.el	Tue Aug 28 08:33:51 2001 +0000
+++ b/lisp/replace.el	Tue Aug 28 08:56:28 2001 +0000
@@ -170,7 +170,7 @@
      ;; We make TO a list because replace-match-string-symbols requires one,
      ;; and the user might enter a single token.
      (replace-match-string-symbols to)
-     (list from (car to) start end current-prefix-arg)))
+     (list from (car to) current-prefix-arg start end)))
   (perform-replace regexp (cons 'replace-eval-replacement to-expr)
 		   start end t t delimited))