Mercurial > emacs
changeset 48546:12718f5f58aa
(encode-mac-roman): Deal with unencodable
characters.
| author | Dave Love <fx@gnu.org> |
|---|---|
| date | Tue, 26 Nov 2002 18:16:28 +0000 |
| parents | 538af265a4a7 |
| children | 930e1c30b4ea |
| files | lisp/language/european.el |
| diffstat | 1 files changed, 3 insertions(+), 0 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/language/european.el Mon Nov 25 23:30:19 2002 +0000 +++ b/lisp/language/european.el Tue Nov 26 18:16:28 2002 +0000 @@ -578,6 +578,9 @@ (read-multibyte-character r0 r1) (translate-character ucs-mule-to-mule-unicode 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")