Re: query-replace-regexp slow for evaluated lisp expressions

[Chris Moore]

"Aaron S. Hawley" <address@hidden> writes:

> Then, do the most basic of replacements that would never be done in
> practice, but shows how slow interactive regexp replacements can be:

Or just replace it with \,\& for an even simpler test case.

Does this patch fix the bug?

--- old/replace.el      2007-01-07 01:40:26.000000000 +0100
+++ replace.el  2007-01-07 01:40:42.000000000 +0100
@@ -1518,8 +1518,7 @@
              (set-match-data real-match-data)
              (setq next-replacement
                    (funcall (car replacements) (cdr replacements)
-                            replace-count)
-                   noedit nil))
+                            replace-count)))
            (if (not query-flag)
                (let ((inhibit-read-only
                       query-replace-skip-read-only))