From: Eli Zaretskii <eliz@gnu.org>
Date: Thu, 13 Aug 2015 14:36:38 +0000 (+0300)
Subject: Improve warning about purecopy of strings with properties
X-Git-Tag: emacs-25.0.90~1373^2~47
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=9c13a81a9e1aa74901cd958d7adb3ca71966dbef;p=emacs.git

Improve warning about purecopy of strings with properties

* src/alloc.c (purecopy): Show the offending string with the
warning about removing its text properties.
---

diff --git a/src/alloc.c b/src/alloc.c
index 9ac3ad84131..050097c905a 100644
--- a/src/alloc.c
+++ b/src/alloc.c
@@ -5353,7 +5353,8 @@ purecopy (Lisp_Object obj)
   else if (STRINGP (obj))
     {
       if (XSTRING (obj)->intervals)
-	message ("Dropping text-properties when making string pure");
+	message_with_string ("Dropping text-properties while making string `%s' pure",
+			     obj, true);
       obj = make_pure_string (SSDATA (obj), SCHARS (obj),
 			      SBYTES (obj),
 			      STRING_MULTIBYTE (obj));