summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorKenichi Handa <handa@m17n.org>2002-11-26 23:30:50 +0000
committerKenichi Handa <handa@m17n.org>2002-11-26 23:30:50 +0000
commitb3f2a2323f8b7b065c573faad107bdb47553b455 (patch)
tree92b660598045fb9131cd67e18ab9027f301149b5
parent9fb1f1f0020f1323c6c19efe4d86bd7cdf504c78 (diff)
downloademacs-b3f2a2323f8b7b065c573faad107bdb47553b455.tar.gz
(encode-mac-roman): Deal with unencodable characters.
-rw-r--r--lisp/language/european.el3
1 files changed, 3 insertions, 0 deletions
diff --git a/lisp/language/european.el b/lisp/language/european.el
index 42c98ec5a7f..c02520efef3 100644
--- a/lisp/language/european.el
+++ b/lisp/language/european.el
@@ -516,6 +516,9 @@ but it selects the Dutch tutorial."))
((loop
(read-multibyte-character r0 r1)
(translate-character mac-roman-encoder r0 r1)
+ (if (r0 != ,(charset-id 'eight-bit-graphic))
+ (if (r0 != ,(charset-id 'eight-bit-control))
+ (r1 = ??)))
(write-repeat r1))))
"CCL program to encode Mac Roman")