From b3f2a2323f8b7b065c573faad107bdb47553b455 Mon Sep 17 00:00:00 2001 From: Kenichi Handa Date: Tue, 26 Nov 2002 23:30:50 +0000 Subject: [PATCH] (encode-mac-roman): Deal with unencodable characters. --- lisp/language/european.el | 3 +++ 1 file changed, 3 insertions(+) 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") -- 2.39.5