(coding-system-eol-type-mnemonic): Return correct eol-type mnemonics

for the nonunix cases.

diff --git a/lisp/international/mule-util.el b/lisp/international/mule-util.el
index 949d2c766c3fa081cd1890b3fb649f50c3dab83e..a2b534ada2800ae1a34be82a2ef8f078ccfa2492 100644 (file)
--- a/lisp/international/mule-util.el
+++ b/lisp/international/mule-util.el
@@ -216,8 +216,8 @@ Optional 3rd argument NIL-FOR-TOO-LONG non-nil means return nil
   (let ((eol-type (coding-system-eol-type coding-system)))
     (cond ((vectorp eol-type) eol-mnemonic-undecided)
          ((eq eol-type 0) eol-mnemonic-unix)
-         ((eq eol-type 1) eol-mnemonic-unix)
-         ((eq eol-type 2) eol-mnemonic-unix)
+         ((eq eol-type 1) eol-mnemonic-dos)
+         ((eq eol-type 2) eol-mnemonic-mac)
          (t ?-))))
 
 ;;;###autoload