diff options
author | Chong Yidong <cyd@stupidchicken.com> | 2007-06-15 00:00:37 +0000 |
---|---|---|
committer | Chong Yidong <cyd@stupidchicken.com> | 2007-06-15 00:00:37 +0000 |
commit | 4769f8c55596eb5f92e902dbfa822b3f607f114b (patch) | |
tree | 229f93f7b8f4de1486c26de546e52554471961d6 /src | |
parent | 72918b615891bb382a575ef0fb302c7b659bd997 (diff) | |
download | emacs-4769f8c55596eb5f92e902dbfa822b3f607f114b.tar.gz |
(update_compositions): Check validity of compositions.
Diffstat (limited to 'src')
-rw-r--r-- | src/composite.c | 13 |
1 files changed, 9 insertions, 4 deletions
diff --git a/src/composite.c b/src/composite.c index 3e0606e9007..b0a5ebbc3ee 100644 --- a/src/composite.c +++ b/src/composite.c @@ -500,7 +500,8 @@ update_compositions (from, to, check_mask) avoid it, in such a case, we change the property of the latter to the copy of it. */ if (from > BEGV - && find_composition (from - 1, -1, &start, &end, &prop, Qnil)) + && find_composition (from - 1, -1, &start, &end, &prop, Qnil) + && COMPOSITION_VALID_P (start, end, prop)) { if (from < end) Fput_text_property (make_number (from), make_number (end), @@ -510,7 +511,8 @@ update_compositions (from, to, check_mask) from = end; } else if (from < ZV - && find_composition (from, -1, &start, &from, &prop, Qnil)) + && find_composition (from, -1, &start, &from, &prop, Qnil) + && COMPOSITION_VALID_P (start, from, prop)) run_composition_function (start, from, prop); } @@ -521,6 +523,7 @@ update_compositions (from, to, check_mask) (to - 1). */ while (from < to - 1 && find_composition (from, to, &start, &from, &prop, Qnil) + && COMPOSITION_VALID_P (start, from, prop) && from < to - 1) run_composition_function (start, from, prop); } @@ -528,7 +531,8 @@ update_compositions (from, to, check_mask) if (check_mask & CHECK_TAIL) { if (from < to - && find_composition (to - 1, -1, &start, &end, &prop, Qnil)) + && find_composition (to - 1, -1, &start, &end, &prop, Qnil) + && COMPOSITION_VALID_P (start, end, prop)) { /* TO should be also at composition boundary. But, insertion or deletion will make two compositions adjacent @@ -542,7 +546,8 @@ update_compositions (from, to, check_mask) run_composition_function (start, end, prop); } else if (to < ZV - && find_composition (to, -1, &start, &end, &prop, Qnil)) + && find_composition (to, -1, &start, &end, &prop, Qnil) + && COMPOSITION_VALID_P (start, end, prop)) run_composition_function (start, end, prop); } } |