[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
Mule-UCS (was: How to add some more charsets to mew?)
From: |
Tatsuya Kinoshita |
Subject: |
Mule-UCS (was: How to add some more charsets to mew?) |
Date: |
Tue, 16 Apr 2002 10:15:09 +0900 (JST) |
At 15 Apr 2002 22:17:35 +0100,
Jason Rumney <address@hidden> wrote:
> Dave Love had some success. He posted his patches to
> gnu.emacs.sources and the address@hidden mailing list on 29 March.
> You even followed that up with a comment about Mule-UCS no longer
> seeming to be maintained.
I know that. Debian's mule-ucs 0.84-10 applied the Dave Love's
patch, address@hidden: 03279, on 29 Mar 2002.
However, it fails on Emacs 20 and XEmacs. mule-ucs 0.84-11 has
fixed this problem.
I've found a small bug fix in mule-ucs 0.84-11. See the
following patch:
----
--- mule-ucs-0.84-10/lisp/un-define.el Tue Apr 16 09:47:40 2002
+++ mule-ucs-0.84-11/lisp/un-define.el Tue Apr 16 09:47:54 2002
@@ -618,13 +618,13 @@
(mucs-define-coding-system
(car x) (nth 1 y) (nth 2 y)
(nth 3 y) (nth 4 y) (nth 5 y)))
- (mapcar
- (lambda (y)
+ (mapcar
+ (lambda (y)
(mucs-define-coding-system
- (nth 0 y) (nth 1 y) (nth 2 y)
- (nth 3 y) (nth 4 y) (nth 5 y) (nth 6 y))
- (coding-system-put (car y) 'alias-coding-systems (list (car x)))))
- (cdr x)))
+ (nth 0 y) (nth 1 y) (nth 2 y)
+ (nth 3 y) (nth 4 y) (nth 5 y) (nth 6 y))
+ (coding-system-put (car y) 'alias-coding-systems (list (car x))))
+ (cdr x))))
`((utf-8
(utf-8-unix
?u "UTF-8 coding system"
----
--
Tatsuya Kinoshita