diff options
| author | Karl Heuer <kwzh@gnu.org> | 1994-02-24 20:01:13 +0000 |
|---|---|---|
| committer | Karl Heuer <kwzh@gnu.org> | 1994-02-24 20:01:13 +0000 |
| commit | 67406ef460442417a1daa4e0e5728ecc9a8c7a42 (patch) | |
| tree | 3358004341126b50e82e0569eae266921123573a /src | |
| parent | 3ae8ced7cb508d0b2958f78a9a47be9215bfe76b (diff) | |
| download | emacs-67406ef460442417a1daa4e0e5728ecc9a8c7a42.tar.gz | |
(compute_motion, vmotion): Use Fget_char_property to test for invisibility.
Diffstat (limited to 'src')
| -rw-r--r-- | src/indent.c | 10 |
1 files changed, 5 insertions, 5 deletions
diff --git a/src/indent.c b/src/indent.c index cafe6122e91..5824dbc9993 100644 --- a/src/indent.c +++ b/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; |