aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorEli Zaretskii1998-04-13 06:30:41 +0000
committerEli Zaretskii1998-04-13 06:30:41 +0000
commit9140684333edd01ed10e53eca6bea33cf2c81431 (patch)
tree920389ed5daed057c38852bc9a6adf66f4a9e6bb
parente76351bcf4dd0c67a0d048b543f323fe8ce0cdc4 (diff)
downloademacs-9140684333edd01ed10e53eca6bea33cf2c81431.tar.gz
emacs-9140684333edd01ed10e53eca6bea33cf2c81431.zip
(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
216 (let ((eol-type (coding-system-eol-type coding-system))) 216 (let ((eol-type (coding-system-eol-type coding-system)))
217 (cond ((vectorp eol-type) eol-mnemonic-undecided) 217 (cond ((vectorp eol-type) eol-mnemonic-undecided)
218 ((eq eol-type 0) eol-mnemonic-unix) 218 ((eq eol-type 0) eol-mnemonic-unix)
219 ((eq eol-type 1) eol-mnemonic-unix) 219 ((eq eol-type 1) eol-mnemonic-dos)
220 ((eq eol-type 2) eol-mnemonic-unix) 220 ((eq eol-type 2) eol-mnemonic-mac)
221 (t ?-)))) 221 (t ?-))))
222 222
223;;;###autoload 223;;;###autoload