diff options
Diffstat (limited to 'lisp/language')
| -rw-r--r-- | lisp/language/european.el | 7 |
1 files changed, 4 insertions, 3 deletions
diff --git a/lisp/language/european.el b/lisp/language/european.el index 4d4b71a8201..b594fb37413 100644 --- a/lisp/language/european.el +++ b/lisp/language/european.el @@ -578,9 +578,10 @@ 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 = ??))) + (if (r0 != ,(charset-id 'ascii)) + (if (r0 != ,(charset-id 'eight-bit-graphic)) + (if (r0 != ,(charset-id 'eight-bit-control)) + (r1 = ??)))) (write-repeat r1)))) "CCL program to encode Mac Roman") |