Mercurial > emacs
changeset 5644:2abe67658895
(Fprevious_property_change): Move back at least 1 char.
(Fprevious_single_property_change): Likewise.
author | Richard M. Stallman <rms@gnu.org> |
---|---|
date | Thu, 20 Jan 1994 19:54:47 +0000 |
parents | 860d91d72063 |
children | 214263de8277 |
files | src/textprop.c |
diffstat | 1 files changed, 8 insertions(+), 0 deletions(-) [+] |
line wrap: on
line diff
--- a/src/textprop.c Thu Jan 20 15:12:30 1994 +0000 +++ b/src/textprop.c Thu Jan 20 19:54:47 1994 +0000 @@ -647,6 +647,10 @@ if (NULL_INTERVAL_P (i)) return limit; + /* Start with the interval containing the char before point. */ + if (i->position == XFASTINT (pos)) + i = previous_interval (i); + previous = previous_interval (i); while (! NULL_INTERVAL_P (previous) && intervals_equal (previous, i) && (NILP (limit) @@ -686,6 +690,10 @@ if (NULL_INTERVAL_P (i)) return limit; + /* Start with the interval containing the char before point. */ + if (i->position == XFASTINT (pos)) + i = previous_interval (i); + here_val = textget (i->plist, prop); previous = previous_interval (i); while (! NULL_INTERVAL_P (previous)