Mercurial > emacs
comparison src/composite.c @ 39046:a61b3d907098
(update_compositions): Do nothing if
inhibit-modification-hooks is set.
| author | Gerd Moellmann <gerd@gnu.org> |
|---|---|
| date | Fri, 31 Aug 2001 08:03:43 +0000 |
| parents | a85b9df3dffb |
| children | 579177964efa |
comparison
equal
deleted
inserted
replaced
| 39045:2a7279b2f60d | 39046:a61b3d907098 |
|---|---|
| 487 int from, to; | 487 int from, to; |
| 488 { | 488 { |
| 489 Lisp_Object prop; | 489 Lisp_Object prop; |
| 490 int start, end; | 490 int start, end; |
| 491 | 491 |
| 492 if (inhibit_modification_hooks) | |
| 493 return; | |
| 494 | |
| 492 /* If FROM and TO are not in a valid range, do nothing. */ | 495 /* If FROM and TO are not in a valid range, do nothing. */ |
| 493 if (! (BEGV <= from && from <= to && to <= ZV)) | 496 if (! (BEGV <= from && from <= to && to <= ZV)) |
| 494 return; | 497 return; |
| 495 | 498 |
| 496 if (check_mask & CHECK_HEAD) | 499 if (check_mask & CHECK_HEAD) |
| 600 void | 603 void |
| 601 compose_chars_in_text (start, end, string) | 604 compose_chars_in_text (start, end, string) |
| 602 int start, end; | 605 int start, end; |
| 603 Lisp_Object string; | 606 Lisp_Object string; |
| 604 { | 607 { |
| 605 int count; | 608 int count = 0; |
| 606 struct gcpro gcpro1; | 609 struct gcpro gcpro1; |
| 607 Lisp_Object tail, elt, val, to; | 610 Lisp_Object tail, elt, val, to; |
| 608 /* Set to nonzero if we don't have to compose ASCII characters. */ | 611 /* Set to nonzero if we don't have to compose ASCII characters. */ |
| 609 int skip_ascii; | 612 int skip_ascii; |
| 610 int i, len, stop, c; | 613 int i, len, stop, c; |