changeset 33203:e91d2b7a0908

(decode-mac-roman): Test against r1 not r0.
author Jason Rumney <jasonr@gnu.org>
date Sat, 04 Nov 2000 11:42:12 +0000
parents 0a59b8c1e2fc
children 3b4c21189166
files lisp/language/european.el
diffstat 1 files changed, 1 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/language/european.el	Fri Nov 03 23:06:54 2000 +0000
+++ b/lisp/language/european.el	Sat Nov 04 11:42:12 2000 +0000
@@ -479,7 +479,7 @@
       (read r1)
       (if (r1 < 128)  ;; ASCII
 	  (r0 = ,(charset-id 'ascii))
-	(if (r0 < 160)
+	(if (r1 < 160)
 	    (r0 = ,(charset-id 'eight-bit-control))
 	  (r0 = ,(charset-id 'eight-bit-graphic))))
       (translate-character mac-roman-decoder r0 r1)