(compute_motion): Pass window to Fget_char_property.

diff --git a/src/indent.c b/src/indent.c
index eb598424ff50b8a25262492bc59f6e8fb8ab58f9..aa3f855344e58b254a44728a7c055b2bff88cef0 100644 (file)
--- a/src/indent.c
+++ b/src/indent.c
@@ -676,8 +676,10 @@ compute_motion (from, fromvpos, fromhpos, did_motion, to, tovpos, tohpos, width,
 
   /* The next buffer pos where we should consult the width run cache. */
   int next_width_run = from;
+  Lisp_Object window;
 
   XSETBUFFER (buffer, current_buffer);
+  XSETWINDOW (window, win);
 
   width_run_cache_on_off ();
   if (dp == buffer_display_table ())
@@ -747,8 +749,7 @@ compute_motion (from, fromvpos, fromhpos, did_motion, to, tovpos, tohpos, width,
              }
            /* if the `invisible' property is set, we can skip to
               the next property change */
-           prop = Fget_char_property (position, Qinvisible,
-                                      Fcurrent_buffer ());
+           prop = Fget_char_property (position, Qinvisible, window);
            if (TEXT_PROP_MEANS_INVISIBLE (prop))
              pos = next_boundary;
          }