(make_composition_value_copy): Extern it.

2 files changed, 13 insertions, 0 deletions

diff --git a/src/ChangeLog b/src/ChangeLog
index 611bace2375..82730f06721 100644
--- a/src/ChangeLog
+++ b/src/ChangeLog
@@ -1,3 +1,15 @@
+2000-07-04  Kenichi Handa  <handa@etl.go.jp>
+
+        * composite.h (make_composition_value_copy): Extern it.
+
+        * composite.c (make_composition_value_copy): New function.
+
+        * editfns.c (Fformat): While copying text properties, make each
+        composition property value a copy.
+
+        * fns.c (concat): While copying text properties, make each
+        composition property value a copy.
+
 2000-07-03  Gerd Moellmann  <gerd@gnu.org>
 
         * m/macppc.h (LINKER, LD_SWITCH_MACHINE) [LINUX]: Define.
diff --git a/src/composite.h b/src/composite.h
index a3da0ce9c8b..41be8fdcac7 100644
--- a/src/composite.h
+++ b/src/composite.h
@@ -199,6 +199,7 @@ extern int get_composition_id P_ ((int, int, int, Lisp_Object, Lisp_Object));
 extern int find_composition P_ ((int, int, int *, int *, Lisp_Object *,
                                  Lisp_Object));
 extern void update_compositions P_ ((int, int, int));
+extern void make_composition_value_copy P_ ((Lisp_Object));
 extern void compose_region P_ ((int, int, Lisp_Object, Lisp_Object,
                                 Lisp_Object));
 extern void syms_of_composition P_ ((void));