# HG changeset patch
# User Juanma Barranquero <lekktu@gmail.com>
# Date 1036492984 0
# Node ID 5701c670b67642a50745c1b1a6ceed52aadac4db
# Parent  f1434b395146e022e31267bfe49fe332137b07d3
(coding-system-eol-type-mnemonic): Move to mule.el.

diff -r f1434b395146 -r 5701c670b676 lisp/international/mule-util.el
--- a/lisp/international/mule-util.el	Tue Nov 05 10:42:25 2002 +0000
+++ b/lisp/international/mule-util.el	Tue Nov 05 10:43:04 2002 +0000
@@ -195,7 +195,7 @@
 ;; 		(("こhんeにlちlはo" 13 4 ?x "日本語") . "xex日本語")
 ;; 		))
 ;;   (let (ret)
-;;     (condition-case e 
+;;     (condition-case e
 ;; 	(setq ret (apply #'truncate-string-to-width (car test)))
 ;;       (error (setq ret e)))
 ;;     (unless (equal ret (cdr test))
@@ -294,19 +294,6 @@
 ;; Coding system related functions.
 
 ;;;###autoload
-(defun coding-system-eol-type-mnemonic (coding-system)
-  "Return the string indicating end-of-line format of CODING-SYSTEM."
-  (let* ((eol-type (coding-system-eol-type coding-system))
-	 (val (cond ((vectorp eol-type) eol-mnemonic-undecided)
-		    ((eq eol-type 0) eol-mnemonic-unix)
-		    ((eq eol-type 1) eol-mnemonic-dos)
-		    ((eq eol-type 2) eol-mnemonic-mac)
-		    (t "-"))))
-    (if (stringp val)
-	val
-      (char-to-string val))))
-
-;;;###autoload
 (defun coding-system-post-read-conversion (coding-system)
   "Return the value of CODING-SYSTEM's `post-read-conversion' property."
   (coding-system-get coding-system 'post-read-conversion))