Revision: emacs@sv.gnu.org/emacs--devo--0--patch-261

lisp/replace.el (occur-engine): Bind `inhibit-field-text-motion' to t

2 files changed, 5 insertions, 0 deletions

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 566d66a5731..c1fe4d6a8a5 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,7 @@
+2006-05-02  Miles Bader  <miles@gnu.org>
+
+        * replace.el (occur-engine): Bind `inhibit-field-text-motion' to t.
+
 2006-05-02  Jay Belanger  <belanger@truman.edu>
 
         * calc/calc-embed.el: (calc-override-minor-modes-map)
diff --git a/lisp/replace.el b/lisp/replace.el
index 3187bbbbd36..f1792b499fc 100644
--- a/lisp/replace.el
+++ b/lisp/replace.el
@@ -1098,6 +1098,7 @@ See also `multi-occur'."
                 (endpt nil)
                 (marker nil)
                 (curstring "")
+                (inhibit-field-text-motion t)
                 (headerpt (with-current-buffer out-buf (point))))
             (with-current-buffer buf
               (or coding