# HG changeset patch
# User Kenichi Handa <handa@m17n.org>
# Date 1097558654 0
# Node ID 0a99216aefaf2a23509f4c51b8823bf96f882027
# Parent  2d9a1d1ac73d45f9f79c665a475bf92a1d19baa1
(coding-system-equal): Moved to mule.el.

diff -r 2d9a1d1ac73d -r 0a99216aefaf lisp/international/mule-util.el
--- a/lisp/international/mule-util.el	Tue Oct 12 02:25:56 2004 +0000
+++ b/lisp/international/mule-util.el	Tue Oct 12 05:24:14 2004 +0000
@@ -315,19 +315,6 @@
   (coding-system-get coding-system 'translation-table-for-encode))
 
 ;;;###autoload
-(defun coding-system-equal (coding-system-1 coding-system-2)
-  "Return t if and only if CODING-SYSTEM-1 and CODING-SYSTEM-2 are identical.
-Two coding systems are identical if two symbols are equal
-or one is an alias of the other."
-  (or (eq coding-system-1 coding-system-2)
-      (and (equal (coding-system-spec coding-system-1)
-		  (coding-system-spec coding-system-2))
-	   (let ((eol-type-1 (coding-system-eol-type coding-system-1))
-		 (eol-type-2 (coding-system-eol-type coding-system-2)))
-	     (or (eq eol-type-1 eol-type-2)
-		 (and (vectorp eol-type-1) (vectorp eol-type-2)))))))
-
-;;;###autoload
 (defmacro detect-coding-with-priority (from to priority-list)
   "Detect a coding system of the text between FROM and TO with PRIORITY-LIST.
 PRIORITY-LIST is an alist of coding categories vs the corresponding