(Fnext_property_change): Fix previous change.

1 files changed, 6 insertions, 1 deletions

diff --git a/src/textprop.c b/src/textprop.c
index 7e92be89865..7f635777d0b 100644
--- 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;
     }