aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorKarl Heuer1994-06-03 04:08:32 +0000
committerKarl Heuer1994-06-03 04:08:32 +0000
commit6873cfa3939381670ee08dd890131bbe593db3c4 (patch)
treefaaab52335f9d2b464ab655fadd63118a64222b3
parent1105ff2059bda83b1a9f3fd659b4b88145b476bb (diff)
downloademacs-6873cfa3939381670ee08dd890131bbe593db3c4.tar.gz
emacs-6873cfa3939381670ee08dd890131bbe593db3c4.zip
(Fprevious_single_property_change): Check for null interval after correcting
for edge effects.
-rw-r--r--src/textprop.c7
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)