(compute_motion, vmotion): Use Fget_char_property to test for invisibility.
This commit is contained in:
parent
3ae8ced7cb
commit
67406ef460
1 changed files with 5 additions and 5 deletions
10
src/indent.c
10
src/indent.c
|
@ -474,7 +474,7 @@ compute_motion (from, fromvpos, fromhpos, to, tovpos, tohpos, width, hscroll, ta
|
|||
while (pos == next_invisible && pos < to)
|
||||
{
|
||||
XFASTINT (position) = pos;
|
||||
prop = Fget_text_property (position,
|
||||
prop = Fget_char_property (position,
|
||||
Qinvisible,
|
||||
Fcurrent_buffer ());
|
||||
{
|
||||
|
@ -663,9 +663,9 @@ vmotion (from, vtarget, width, hscroll, window)
|
|||
&& indented_beyond_p (prevline, selective))
|
||||
#ifdef USE_TEXT_PROPERTIES
|
||||
/* watch out for newlines with `invisible' property */
|
||||
|| ! NILP (Fget_text_property (XFASTINT (prevline),
|
||||
|| ! NILP (Fget_char_property (XFASTINT (prevline),
|
||||
Qinvisible,
|
||||
Fcurrent_buffer ()))
|
||||
window))
|
||||
#endif
|
||||
))
|
||||
prevline = find_next_newline (prevline - 1, -1);
|
||||
|
@ -700,9 +700,9 @@ vmotion (from, vtarget, width, hscroll, window)
|
|||
|| ! indented_beyond_p (prevline, selective))
|
||||
#ifdef USE_TEXT_PROPERTIES
|
||||
/* watch out for newlines with `invisible' property */
|
||||
&& NILP (Fget_text_property (XFASTINT (prevline),
|
||||
&& NILP (Fget_char_property (XFASTINT (prevline),
|
||||
Qinvisible,
|
||||
Fcurrent_buffer ()))
|
||||
window))
|
||||
#endif
|
||||
))
|
||||
break;
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue