]> git.eshelyaron.com Git - emacs.git/commitdiff
(iso-transl-define-keys): Don't test enable-multibyte-characters; use
authorRichard M. Stallman <rms@gnu.org>
Wed, 29 Jul 1998 02:54:35 +0000 (02:54 +0000)
committerRichard M. Stallman <rms@gnu.org>
Wed, 29 Jul 1998 02:54:35 +0000 (02:54 +0000)
the translated characters as specified in alist.

lisp/international/iso-transl.el

index faf268e93c327ba62df1557fce1f9ff41758a8d3..c0cbcd50de521435009e1d41f832d471edfefa56 100644 (file)
@@ -221,11 +221,7 @@ sequence VECTOR.  (VECTOR is normally one character long.)")
 ;; or `Alt-~ n' or `mute-asciitilde n'.
 (defun iso-transl-define-keys (alist)
   (while alist
-    (let ((translated-vec
-          (let ((val (cdr (car alist))))
-            (if (and enable-multibyte-characters (>= (aref val 0) ?\200))
-                (vector (+ (aref val 0) nonascii-insert-offset))
-              val))))
+    (let ((translated-vec (cdr (car alist))))
       (define-key iso-transl-ctl-x-8-map (car (car alist)) translated-vec)
       (let ((inchar (aref (car (car alist)) 0))
            (vec (vconcat (car (car alist))))