From d4760a9128d313d9b4f242acfcfce1c6426d00f1 Mon Sep 17 00:00:00 2001 From: Eli Zaretskii Date: Mon, 13 Apr 1998 06:30:41 +0000 Subject: (coding-system-eol-type-mnemonic): Return correct eol-type mnemonics for the nonunix cases. --- lisp/international/mule-util.el | 4 ++-- 1 file 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 -- cgit v1.2.1