diff options
| author | Dave Love <fx@gnu.org> | 2002-11-26 18:16:28 +0000 |
|---|---|---|
| committer | Dave Love <fx@gnu.org> | 2002-11-26 18:16:28 +0000 |
| commit | 438d2df3dbd78d967d6aab311a06b2d7214be6e5 (patch) | |
| tree | bfb050c7db8131761070dfe290962692e46f8d04 /lisp/language | |
| parent | 30a32e0ea1598711765e1b4fda938b4ea07d6ea7 (diff) | |
| download | emacs-438d2df3dbd78d967d6aab311a06b2d7214be6e5.tar.gz | |
(encode-mac-roman): Deal with unencodable
characters.
Diffstat (limited to 'lisp/language')
| -rw-r--r-- | lisp/language/european.el | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/lisp/language/european.el b/lisp/language/european.el index 0f725ab4a2f..105692a3d5b 100644 --- a/lisp/language/european.el +++ b/lisp/language/european.el @@ -578,6 +578,9 @@ but it selects the Dutch tutorial and input method.")) (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") |