From: Kenichi Handa <handa@m17n.org>
Date: Fri, 28 Aug 1998 12:33:52 +0000 (+0000)
Subject: (code_convert_region1): Remove all text properties of the region.
X-Git-Tag: emacs-20.4~1813
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=df2ddb2d286c264eeba546f930456412ac9526d0;p=emacs.git

(code_convert_region1): Remove all text properties of the region.
---

diff --git a/src/coding.c b/src/coding.c
index 89e82678a2d..829d8ec1ebd 100644
--- a/src/coding.c
+++ b/src/coding.c
@@ -4733,6 +4733,10 @@ code_convert_region1 (start, end, coding_system, encodep)
   if (setup_coding_system (Fcheck_coding_system (coding_system), &coding) < 0)
     error ("Invalid coding system: %s", XSYMBOL (coding_system)->name->data);
 
+  /* The code conversion routine can not preserve text properties for
+     now.  So, we must remove all text properties in the region.  */
+  Fset_text_properties (start, end, Qnil, Qnil);
+
   coding.mode |= CODING_MODE_LAST_BLOCK;
   code_convert_region (from, CHAR_TO_BYTE (from), to, CHAR_TO_BYTE (to),
 		       &coding, encodep, 1);