Re: Mule-UCS 0.85 RC2

On January 18, 2003, [mule-ja:08478],
MIYASHITA Hisashi <[email protected]> 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  <[email protected]>

	* 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)))