diff options
| -rw-r--r-- | src/ChangeLog | 5 | ||||
| -rw-r--r-- | src/composite.c | 4 |
2 files changed, 7 insertions, 2 deletions
diff --git a/src/ChangeLog b/src/ChangeLog index cf792aaf215..dcaae37ad7e 100644 --- a/src/ChangeLog +++ b/src/ChangeLog | |||
| @@ -1,3 +1,8 @@ | |||
| 1 | 2001-06-19 Gerd Moellmann <gerd@gnu.org> | ||
| 2 | |||
| 3 | * composite.c (Ffind_composition_internal): Accept ZV | ||
| 4 | and a string's end position as POS. | ||
| 5 | |||
| 1 | 2001-06-18 Gerd Moellmann <gerd@gnu.org> | 6 | 2001-06-18 Gerd Moellmann <gerd@gnu.org> |
| 2 | 7 | ||
| 3 | * composite.c (Ffind_composition_internal): Check POS | 8 | * composite.c (Ffind_composition_internal): Check POS |
diff --git a/src/composite.c b/src/composite.c index 6db705cec4e..c18d8eb749c 100644 --- a/src/composite.c +++ b/src/composite.c | |||
| @@ -782,12 +782,12 @@ See `find-composition' for more detail.") | |||
| 782 | if (!NILP (string)) | 782 | if (!NILP (string)) |
| 783 | { | 783 | { |
| 784 | CHECK_STRING (string, 2); | 784 | CHECK_STRING (string, 2); |
| 785 | if (XINT (pos) < 0 || XINT (pos) >= XSTRING (string)->size) | 785 | if (XINT (pos) < 0 || XINT (pos) > XSTRING (string)->size) |
| 786 | args_out_of_range (string, pos); | 786 | args_out_of_range (string, pos); |
| 787 | } | 787 | } |
| 788 | else | 788 | else |
| 789 | { | 789 | { |
| 790 | if (XINT (pos) < BEGV || XINT (pos) >= ZV) | 790 | if (XINT (pos) < BEGV || XINT (pos) > ZV) |
| 791 | args_out_of_range (Fcurrent_buffer (), pos); | 791 | args_out_of_range (Fcurrent_buffer (), pos); |
| 792 | } | 792 | } |
| 793 | 793 | ||