(rfn-eshadow-update-overlay): Bind `inhibit-point-motion-hooks' to t while

messing around, to avoid getting hosed by our own intangible property.

2 files changed, 15 insertions, 8 deletions

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 5a5fc5b609d..218a8ce9b85 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,9 @@
+2002-03-14  Miles Bader  <miles@gnu.org>
+
+        * rfn-eshadow.el (rfn-eshadow-update-overlay): Bind
+        `inhibit-point-motion-hooks' to t while messing around, to avoid
+        getting hosed by our own intangible property.
+
 2002-03-13  Francesco Potorti`  <pot@gnu.org>
 
         * progmodes/etags.el (tag-exact-file-name-match-p)
diff --git a/lisp/rfn-eshadow.el b/lisp/rfn-eshadow.el
index 827708255ed..e88dc8f3aaf 100644
--- a/lisp/rfn-eshadow.el
+++ b/lisp/rfn-eshadow.el
@@ -1,6 +1,6 @@
 ;;; rfn-eshadow.el --- Highlight `shadowed' part of read-file-name input text
 ;;
-;; Copyright (C) 2000, 2001 Free Software Foundation, Inc.
+;; Copyright (C) 2000, 2001, 2002 Free Software Foundation, Inc.
 ;;
 ;; Author: Miles Bader <miles@gnu.org>
 ;; Keywords: convenience
@@ -181,13 +181,14 @@ been set up by `rfn-eshadow-setup-minibuffer'."
   ;; substitute-in-file-name would expand; currently it just assumes any
   ;; environment variable contains an absolute filename.
   (save-excursion
-    (goto-char (minibuffer-prompt-end))
-    ;; Update the overlay (which will evaporate if it's empty).
-    (move-overlay rfn-eshadow-overlay
-                  (point)
-                  (if (looking-at rfn-eshadow-regexp)
-                      (match-end 1)
-                    (point)))))
+    (let ((inhibit-point-motion-hooks t))
+      (goto-char (minibuffer-prompt-end))
+      ;; Update the overlay (which will evaporate if it's empty).
+      (move-overlay rfn-eshadow-overlay
+                    (point)
+                    (if (looking-at rfn-eshadow-regexp)
+                        (match-end 1)
+                      (point))))))
 
 
 ;;; Note this definition must be at the end of the file, because