summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorKenichi Handa <handa@m17n.org>2006-11-20 02:47:15 +0000
committerKenichi Handa <handa@m17n.org>2006-11-20 02:47:15 +0000
commitcec726f668b5d03169932cf42f4e2dabbf2ceeb9 (patch)
tree27d9912bd3f8d7176d84a133a9dc20bf46eaea46
parentb07e014310fd5536f85ffff82ec87ccacd2992ba (diff)
downloademacs-cec726f668b5d03169932cf42f4e2dabbf2ceeb9.tar.gz
emacs-cec726f668b5d03169932cf42f4e2dabbf2ceeb9.tar.bz2
emacs-cec726f668b5d03169932cf42f4e2dabbf2ceeb9.zip
(Fvertical_motion): Include composition in the case of
overshoot expected.
-rw-r--r--src/indent.c11
1 files changed, 6 insertions, 5 deletions
diff --git a/src/indent.c b/src/indent.c
index 3cbb105e80f..a30ef6edf7b 100644
--- a/src/indent.c
+++ b/src/indent.c
@@ -2088,10 +2088,10 @@ whether or not it is currently displayed in some window. */)
it_start = IT_CHARPOS (it);
/* We expect the call to move_it_to, further down, to overshoot
- if the starting point is on an image, stretch glyph, or Lisp
- string. We won't need to backtrack in this situation, except
- for one corner case: when the Lisp string contains a
- newline. */
+ if the starting point is on an image, stretch glyph,
+ composition, or Lisp string. We won't need to backtrack in
+ this situation, except for one corner case: when the Lisp
+ string contains a newline. */
if (it.method == GET_FROM_STRING)
{
const char *s = SDATA (it.string);
@@ -2104,7 +2104,8 @@ whether or not it is currently displayed in some window. */)
}
else
it_overshoot_expected_p = (it.method == GET_FROM_IMAGE
- || it.method == GET_FROM_STRETCH);
+ || it.method == GET_FROM_STRETCH
+ || it.method == GET_FROM_COMPOSITION);
reseat_at_previous_visible_line_start (&it);
it.current_x = it.hpos = 0;