diff options
| author | Karl Heuer | 1994-06-03 04:08:32 +0000 |
|---|---|---|
| committer | Karl Heuer | 1994-06-03 04:08:32 +0000 |
| commit | 6873cfa3939381670ee08dd890131bbe593db3c4 (patch) | |
| tree | faaab52335f9d2b464ab655fadd63118a64222b3 | |
| parent | 1105ff2059bda83b1a9f3fd659b4b88145b476bb (diff) | |
| download | emacs-6873cfa3939381670ee08dd890131bbe593db3c4.tar.gz emacs-6873cfa3939381670ee08dd890131bbe593db3c4.zip | |
(Fprevious_single_property_change): Check for null interval after correcting
for edge effects.
| -rw-r--r-- | src/textprop.c | 7 |
1 files changed, 4 insertions, 3 deletions
diff --git a/src/textprop.c b/src/textprop.c index 8778e8d1438..1f8a0503c93 100644 --- a/src/textprop.c +++ b/src/textprop.c | |||
| @@ -763,13 +763,14 @@ back past position LIMIT; return LIMIT if nothing is found until LIMIT.") | |||
| 763 | CHECK_NUMBER_COERCE_MARKER (limit, 0); | 763 | CHECK_NUMBER_COERCE_MARKER (limit, 0); |
| 764 | 764 | ||
| 765 | i = validate_interval_range (object, &pos, &pos, soft); | 765 | i = validate_interval_range (object, &pos, &pos, soft); |
| 766 | if (NULL_INTERVAL_P (i)) | ||
| 767 | return limit; | ||
| 768 | 766 | ||
| 769 | /* Start with the interval containing the char before point. */ | 767 | /* Start with the interval containing the char before point. */ |
| 770 | if (i->position == XFASTINT (pos)) | 768 | if (! NULL_INTERVAL_P (i) && i->position == XFASTINT (pos)) |
| 771 | i = previous_interval (i); | 769 | i = previous_interval (i); |
| 772 | 770 | ||
| 771 | if (NULL_INTERVAL_P (i)) | ||
| 772 | return limit; | ||
| 773 | |||
| 773 | here_val = textget (i->plist, prop); | 774 | here_val = textget (i->plist, prop); |
| 774 | previous = previous_interval (i); | 775 | previous = previous_interval (i); |
| 775 | while (! NULL_INTERVAL_P (previous) | 776 | while (! NULL_INTERVAL_P (previous) |