From: Kenichi Handa <handa@m17n.org>
Date: Tue, 4 Jul 2000 07:37:30 +0000 (+0000)
Subject: (Fformat): While copying text properties, make each composition
X-Git-Tag: emacs-pretest-21.0.90~2998
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=be17069b715f28617d6375ef898f06450c80e6ad;p=emacs.git

(Fformat): While copying text properties, make each composition
property value a copy.
---

diff --git a/src/editfns.c b/src/editfns.c
index 63c1183837c..d2734a0166a 100644
--- a/src/editfns.c
+++ b/src/editfns.c
@@ -3201,6 +3201,10 @@ Use %% to put a single % into the output.")
 	      new_len = make_number (info[n].end - info[n].start);
 	      props = text_property_list (args[n], make_number (0), len, Qnil);
 	      extend_property_ranges (props, len, new_len);
+	      /* If successive arguments have properites, be sure that
+		 the value of `composition' property be the copy.  */
+	      if (n > 1 && info[n - 1].end)
+		make_composition_value_copy (props);
 	      add_text_properties_from_list (val, props,
 					     make_number (info[n].start));
 	    }