From: Karl Heuer <kwzh@gnu.org>
Date: Fri, 24 Mar 1995 22:46:42 +0000 (+0000)
Subject: (Fnext_property_change): Fix previous change.
X-Git-Tag: emacs-19.34~4742
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=c7b6dfa6df76885853be8cadf06d8905e1310940;p=emacs.git

(Fnext_property_change): Fix previous change.
---

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;
     }