From: Jason Rumney <jasonr@gnu.org>
Date: Sat, 4 Nov 2000 11:43:36 +0000 (+0000)
Subject: (decode-mac-roman): Test against r1 not r0.
X-Git-Tag: emacs-pretest-21.0.90~310
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=546790cb86f111943d57627ca6049a033e2cff7e;p=emacs.git

(decode-mac-roman): Test against r1 not r0.
---

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index e19cef52a58..b5901c31cab 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,7 @@
+2000-11-04  Jason Rumney  <jasonr@gnu.org>
+
+	* language/european.el (decode-mac-roman): Test against r1 not r0.
+
 2000-11-03  Stefan Monnier  <monnier@cs.yale.edu>
 
 	* progmodes/icon.el (icon-mode-map): Don't rebind \t.
diff --git a/lisp/language/european.el b/lisp/language/european.el
index 2572390147d..1465e1f3fab 100644
--- a/lisp/language/european.el
+++ b/lisp/language/european.el
@@ -479,7 +479,7 @@ but default input method is set to \"german-postfix\"."))
       (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)