(perform-replace): Doc fix.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index dab47ff9bef72604a36f1aef5c874309a7b2e05b..239db44d00afe3d62a81db252d5a23192a77a845 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,7 @@
+2001-08-03  Gerd Moellmann  <gerd@gnu.org>
+
+       * replace.el (perform-replace): Doc fix.
+
 2001-08-02  Francesco Potorti`  <pot@gnu.org>
 
        * uniquify.el (uniquify-ref-base, uniquify-ref-filename)

diff --git a/lisp/replace.el b/lisp/replace.el
index b42839318c4057a9d4774fde4dcb9d842b2e0a6a..e307f56caacf9a440e74cfe9c7230af8e4f0f561 100644 (file)
--- a/lisp/replace.el
+++ b/lisp/replace.el
@@ -875,9 +875,13 @@ type them."
   "Subroutine of `query-replace'.  Its complexity handles interactive queries.
 Don't use this in your own program unless you want to query and set the mark
 just as `query-replace' does.  Instead, write a simple loop like this:
-  (while (re-search-forward \"foo[ \t]+bar\" nil t)
+
+  (while (re-search-forward \"foo[ \\t]+bar\" nil t)
     (replace-match \"foobar\" nil nil))
-which will run faster and probably do exactly what you want."
+
+which will run faster and probably do exactly what you want.  Please
+see the documentation of `replace-match' to find out how to simulate
+`case-replace'."
   (or map (setq map query-replace-map))
   (and query-flag minibuffer-auto-raise
        (raise-frame (window-frame (minibuffer-window))))