From: Kenichi Handa <handa@m17n.org>
Date: Tue, 8 Mar 2005 09:10:18 +0000 (+0000)
Subject: (ccl-encode-mule-utf-16le-with-signature):
X-Git-Tag: ttn-vms-21-2-B4~1880
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=f7c4d755beb506d9ba72c91071eecedc8bbaa6c2;p=emacs.git

(ccl-encode-mule-utf-16le-with-signature):
Fix BUFFER_MAGNIFICATION to 2.
(ccl-encode-mule-utf-16be-with-signature): Likewise.
---

diff --git a/lisp/international/utf-16.el b/lisp/international/utf-16.el
index 04c9f682139..0c3d3724ea4 100644
--- a/lisp/international/utf-16.el
+++ b/lisp/international/utf-16.el
@@ -411,7 +411,7 @@ after translation through the translation-table named
 Others are encoded as U+FFFD.")
 
 (define-ccl-program ccl-encode-mule-utf-16le-with-signature
-  `(4
+  `(2
     ((write #xFF)
      (write #xFE)
      ,@utf-16le-encode-loop))
@@ -423,7 +423,7 @@ after translation through the translation-table of name
 Others are encoded as U+FFFD.")
 
 (define-ccl-program ccl-encode-mule-utf-16be-with-signature
-  `(4
+  `(2
     ((write #xFE)
      (write #xFF)
      ,@utf-16be-encode-loop))