]> git.eshelyaron.com Git - emacs.git/commitdiff
Change term unification to
authorKenichi Handa <handa@m17n.org>
Mon, 18 May 1998 01:01:00 +0000 (01:01 +0000)
committerKenichi Handa <handa@m17n.org>
Mon, 18 May 1998 01:01:00 +0000 (01:01 +0000)
translation throughtout the file.

lisp/international/mule-conf.el
lisp/international/mule-util.el

index 41ac7b7971a6ad5aa553291a8b6ecab3784b56c9..c6acf6b7f8b426dfe4cf18e3309c321822be861e 100644 (file)
 (setup-special-charsets)
 
 \f
-;; These are tables for unifying characters on decoding and encoding.
-(define-character-unification-table
+;; These are tables for translating characters on decoding and
+;; encoding.
+(define-character-translation-table
   'oldjis-newjis-jisroman-ascii
   (list (cons (make-char 'japanese-jisx0208-1978)
              (make-char 'japanese-jisx0208))
        (cons (make-char 'latin-jisx0201) (make-char 'ascii))))
 
-(setq standard-character-unification-table-for-decode
-      (get 'oldjis-newjis-jisroman-ascii 'unification-table))
+(setq standard-character-translation-table-for-decode
+      (get 'oldjis-newjis-jisroman-ascii 'character-translation-table))
 
-(setq standard-character-unification-table-for-encode nil)
+(setq standard-character-translation-table-for-encode nil)
 
 \f
 ;;; Make fundamental coding systems.
index 38178be30b079a5edc4efd1854fb1ff90b756638..ce6076faab06115a5a76b8d314a9770ea91887cb 100644 (file)
@@ -231,14 +231,14 @@ Optional 3rd argument NIL-FOR-TOO-LONG non-nil means return nil
   (coding-system-get coding-system 'pre-write-conversion))
 
 ;;;###autoload
-(defun coding-system-unification-table-for-decode (coding-system)
-  "Return the value of CODING-SYSTEM's unification-table-for-decode property."
-  (coding-system-get coding-system 'character-unification-table-for-decode))
+(defun coding-system-translation-table-for-decode (coding-system)
+  "Return the value of CODING-SYSTEM's translation-table-for-decode property."
+  (coding-system-get coding-system 'character-translation-table-for-decode))
 
 ;;;###autoload
-(defun coding-system-unification-table-for-encode (coding-system)
-  "Return the value of CODING-SYSTEM's unification-table-for-encode property."
-  (coding-system-get coding-system 'character-unification-table-for-encode))
+(defun coding-system-translation-table-for-encode (coding-system)
+  "Return the value of CODING-SYSTEM's translation-table-for-encode property."
+  (coding-system-get coding-system 'character-translation-table-for-encode))
 
 (defun coding-system-lessp (x y)
   (cond ((eq x 'no-conversion) t)