From: Kenichi Handa <handa@m17n.org>
Date: Tue, 18 Jul 2000 02:30:18 +0000 (+0000)
Subject: (oldjis-newjis-jisroman-ascii): Don't translate some national variant
X-Git-Tag: emacs-pretest-21.0.90~2791
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=3cd01a6c0e7e0d822e50811be9fd01d0dd903081;p=emacs.git

(oldjis-newjis-jisroman-ascii): Don't translate some national variant
characters of latin-jisx0201.
---

diff --git a/lisp/international/mule-conf.el b/lisp/international/mule-conf.el
index 6753ccb9221..9f4afd62c7b 100644
--- a/lisp/international/mule-conf.el
+++ b/lisp/international/mule-conf.el
@@ -259,6 +259,10 @@
   (list (cons (make-char 'japanese-jisx0208-1978)
 	      (make-char 'japanese-jisx0208))
 	(cons (make-char 'latin-jisx0201) (make-char 'ascii))))
+(aset (get 'oldjis-newjis-jisroman-ascii 'translation-table)
+      (make-char 'latin-jisx0201 92) (make-char 'latin-jisx0201 92))
+(aset (get 'oldjis-newjis-jisroman-ascii 'translation-table)
+      (make-char 'latin-jisx0201 126) (make-char 'latin-jisx0201 126))
 
 (setq standard-translation-table-for-decode
       (get 'oldjis-newjis-jisroman-ascii 'translation-table))