summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorEli Zaretskii <eliz@gnu.org>1998-04-13 06:30:41 +0000
committerEli Zaretskii <eliz@gnu.org>1998-04-13 06:30:41 +0000
commitd4760a9128d313d9b4f242acfcfce1c6426d00f1 (patch)
tree4b0448f984888b3816b424f5ef2c8f49dbc06a95
parente178366621bfe54109caaf8742513c9848cb690c (diff)
downloademacs-d4760a9128d313d9b4f242acfcfce1c6426d00f1.tar.gz
(coding-system-eol-type-mnemonic): Return correct eol-type mnemonics
for the nonunix cases.
-rw-r--r--lisp/international/mule-util.el4
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/international/mule-util.el b/lisp/international/mule-util.el
index 949d2c766c3..a2b534ada28 100644
--- 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