From: Richard M. Stallman <rms@gnu.org>
Date: Mon, 15 Sep 1997 06:10:22 +0000 (+0000)
Subject: (coding-system-unification-table-for-encode): Recurse properly.
X-Git-Tag: emacs-20.1~16
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=b55dd0a7ba14091156f970abcd70f023fec4ed7d;p=emacs.git

(coding-system-unification-table-for-encode): Recurse properly.
(coding-system-unification-table-for-decode): Recurse properly.
---

diff --git a/lisp/international/mule-util.el b/lisp/international/mule-util.el
index 6820407135b..7fba1d653a0 100644
--- a/lisp/international/mule-util.el
+++ b/lisp/international/mule-util.el
@@ -254,7 +254,7 @@ coding-spec (see the function `make-coding-system')."
   (and coding-system
        (symbolp coding-system)
        (or (get coding-system 'unification-table-for-decode)
-	   (coding-system-unification-table
+	   (coding-system-unification-table-for-decode
 	    (get coding-system 'coding-system)))))
 
 ;;;###autoload
@@ -263,7 +263,7 @@ coding-spec (see the function `make-coding-system')."
   (and coding-system
        (symbolp coding-system)
        (or (get coding-system 'unification-table-for-encode)
-	   (coding-system-unification-table
+	   (coding-system-unification-table-for-encode
 	    (get coding-system 'coding-system)))))
 
 (defun coding-system-lessp (x y)