[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
Re: Mule-UCS 0.85 RC2
On January 18, 2003, [mule-ja:08478],
MIYASHITA Hisashi <himi@xxxxxxxxxxxxxxxxxxxxxxxxx> wrote:
> ftp://ftp.m17n.org/pub/mule/Mule-UCS/test/Mule-UCS-current.tar.gz
>
> It will be the last release candidate of 0.85 unless anyone claims on it.
Please apply the following patch to fix utf-7 bug. (from [mule-ja:08379])
--
Tatsuya Kinoshita
2002-08-07 ARISAWA Akihiro <ari@xxxxxxxxxxxxxxxx>
* utf.el (ccl-utf-7-decode): Fixed for XEmacs.
Index: utf.el
===================================================================
RCS file: /cvsroot/mule-ucs/lisp/utf.el,v
retrieving revision 1.7
diff -u -r1.7 utf.el
--- utf.el 18 Jan 2003 14:30:15 -0000 1.7
+++ utf.el 18 Jan 2003 15:40:47 -0000
@@ -455,13 +455,13 @@
(if (r1 >= 0)
((r6 = ((r6 << 6) | r1))
(if (r6 >= ,(cn "0x30000"))
- ((r0 = (r6 & ?\xFFFF))
+ ((r0 = (r6 & ,(cn "0xFFFF")))
(r6 = 0))
((read r0)
(r1 = r0 ,ccl-b64-decode-table)
(if (r1 >= 0)
((r6 = ((r6 << 6) | r1))
- (if (r6 >= ?\x800000)
+ (if (r6 >= ,(cn "0x800000"))
;; r6 = 1000 XXXX XXXX XXXX XXXX XXXX
((r0 = ((r6 >> 4) & ,(cn "0xFFFF")))
(r6 = ((r6 & ?\xF) | ?\x30)))