* vcursor.el (vcursor-move): Increase the priority of the overlay.

Fixes: debbugs:9663

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index cde2c91be3d2df3e9a3ac76ca6602464d0dc87cd..20574a95e9afb870a8776649be62c59d4962fb21 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,8 @@
+2012-04-11  Lars Magne Ingebrigtsen  <larsi@gnus.org>
+
+       * vcursor.el (vcursor-move): Increase the priority of the overlay
+       (bug#9663).
+
 2012-04-11  Deniz Dogan  <deniz.a.m.dogan@gmail.com>
 
        * net/rcirc.el (rcirc-kill-channel-buffers): New variable.

diff --git a/lisp/vcursor.el b/lisp/vcursor.el
index 95928ebe87a1fdf6bec7fa4621a374eb9819065a..19cb7a9df8d43a447284c1f861bb130bd4e2b4be 100644 (file)
--- a/lisp/vcursor.el
+++ b/lisp/vcursor.el
@@ -656,12 +656,13 @@ another window.  With LEAVE-W, use the current `vcursor-window'."
       (or window-system
          (display-color-p)
          (overlay-put vcursor-overlay 'before-string vcursor-string))
-      (overlay-put vcursor-overlay 'face 'vcursor))
+      (overlay-put vcursor-overlay 'face 'vcursor)
+      ;; 200 is purely an arbitrary "high" number.  See bug#9663.
+      (overlay-put vcursor-overlay 'priority 200))
     (or leave-w (vcursor-find-window nil t))
     ;; vcursor-window now contains the right buffer
     (or (pos-visible-in-window-p pt vcursor-window)
-       (set-window-point vcursor-window pt)))
-  )
+       (set-window-point vcursor-window pt))))
 
 (defun vcursor-insert (text)
   "Insert TEXT, respecting `vcursor-interpret-input'."