# HG changeset patch
# User Kenichi Handa <handa@m17n.org>
# Date 866640133 0
# Node ID 083d035f7932cc73a4652c7df6a8933a4b521cf3
# Parent  705da3ce58c0b2d4312f67fef948e32a8ab16774
(coding-system-parent): Moved to mule.el.

diff -r 705da3ce58c0 -r 083d035f7932 lisp/international/mule-util.el
--- a/lisp/international/mule-util.el	Wed Jun 18 13:21:23 1997 +0000
+++ b/lisp/international/mule-util.el	Wed Jun 18 13:22:13 1997 +0000
@@ -246,14 +246,6 @@
 	   (coding-system-unification-table
 	    (get coding-system 'coding-system)))))
 
-;;;###autoload
-(defun coding-system-parent (coding-system)
-  "Return parent of CODING-SYSTEM."
-  (let ((parent (get coding-system 'parent-coding-system)))
-    (and parent
-	 (or (coding-system-parent parent)
-	     parent))))
-
 (defun coding-system-lessp (x y)
   (cond ((eq x 'no-conversion) t)
 	((eq y 'no-conversion) nil)