From: Lars Ingebrigtsen <larsi@gnus.org>
Date: Sat, 12 Oct 2019 21:35:26 +0000 (+0200)
Subject: Make Fadd_face_text_property even less destructive
X-Git-Tag: emacs-27.0.90~1121
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=4c9468884c8cb7093e258396acda5a7fb3e09a48;p=emacs.git

Make Fadd_face_text_property even less destructive

* src/textprop.c (Fadd_face_text_property): We need to be
non-destructive in buffers, too, because face properties may have
been added with `put-text-property' as a list that's been reused.
---

diff --git a/src/textprop.c b/src/textprop.c
index 13cd87ac473..93d19754da5 100644
--- a/src/textprop.c
+++ b/src/textprop.c
@@ -1351,7 +1351,7 @@ into it.  */)
 			 (NILP (append)
 			  ? TEXT_PROPERTY_PREPEND
 			  : TEXT_PROPERTY_APPEND),
-			 !STRINGP (object));
+			 false);
   return Qnil;
 }