(Fnext_property_change): Fix previous change.

c7b6dfa6 · Karl Heuer · cd323f89 · c7b6dfa6
Commit c7b6dfa6 authored Mar 24, 1995 by Karl Heuer
Hide whitespace changes
Inline Side-by-side

Showing with 6 additions and 1 deletion

src/textprop.c src/textprop.c +6 -1

No files found.
--- a/src/textprop.c
+++ b/src/textprop.c
@@ -618,7 +618,12 @@ past position LIMIT; return LIMIT if nothing is found before LIMIT.")
     bother checking further intervals.  */
  if (EQ (limit, Qt))
    {
-      XSETFASTINT (pos, next->position - (STRINGP (object)));
+      if (NULL_INTERVAL_P (next))
+	XSETFASTINT (pos, (STRINGP (object)
+			   ? XSTRING (object)->size
+			   : BUF_ZV (XBUFFER (object))));
+      else
+	XSETFASTINT (pos, next->position - (STRINGP (object)));
      return pos;
    }