mirror of
https://git.savannah.gnu.org/git/emacs.git
synced 2025-01-24 19:03:29 +00:00
(compute_motion): Pass window to Fget_char_property.
This commit is contained in:
parent
9541a441a4
commit
0e4358041c
@ -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;
|
||||
}
|
||||
|
Loading…
Reference in New Issue
Block a user