(encode-char): Fix for the ASCII case.

This commit is contained in:
Kenichi Handa 2003-08-18 12:39:14 +00:00
parent 33d0b73fec
commit bb55c6c97e
2 changed files with 10 additions and 1 deletions

View file

@ -1,3 +1,12 @@
2003-08-18 Kenichi Handa <handa@m17n.org>
* international/mule.el (encode-char): Fix for the ASCII case.
2003-08-15 Kenichi Handa <handa@m17n.org>
* international/fontset.el (setup-default-fontset): Change "*" to
nil in the specifications of font family.
2003-08-18 Kim F. Storm <storm@cua.dk>
* kmacro.el (kmacro-keymap): Group related bindings in

View file

@ -370,7 +370,7 @@ code-point in CCS. Currently not supported and just ignored."
(setq split (split-char trans)
charset (car split)))
(cond ((eq charset 'ascii)
char)
(or trans char))
((eq charset 'latin-iso8859-1)
(+ (nth 1 split) 128))
((eq charset 'mule-unicode-0100-24ff)