(make_composition_value_copy): Extern it.

diff --git a/src/ChangeLog b/src/ChangeLog
index 611bace23753968b9a559c66c08c39d16eb73b16..82730f0672147cf78015750d7cf2000ea6b3a609 100644 (file)
--- 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 a3da0ce9c8ba7a3af963621317a8c6331fa6f0a6..41be8fdcac78e1d0393b69ab8effe8f130dec9e2 100644 (file)
--- 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));