Mercurial > emacs
changeset 48164:e2f230bb8acc
(coding-system-eol-type-mnemonic): Use
eol-mnemonic-undecided if CODING-SYSTEM is nil.
author | Kenichi Handa <handa@m17n.org> |
---|---|
date | Wed, 06 Nov 2002 01:07:34 +0000 |
parents | e09ef77a9c62 |
children | 47930f7354a6 |
files | lisp/international/mule.el |
diffstat | 1 files changed, 2 insertions(+), 3 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/international/mule.el Wed Nov 06 00:47:05 2002 +0000 +++ b/lisp/international/mule.el Wed Nov 06 01:07:34 2002 +0000 @@ -516,11 +516,10 @@ (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) + (val (cond ((eq eol-type 0) eol-mnemonic-unix) ((eq eol-type 1) eol-mnemonic-dos) ((eq eol-type 2) eol-mnemonic-mac) - (t "-")))) + (t eol-mnemonic-undecided)))) (if (stringp val) val (char-to-string val))))