diff options
| author | Eli Zaretskii | 1998-04-13 06:30:41 +0000 |
|---|---|---|
| committer | Eli Zaretskii | 1998-04-13 06:30:41 +0000 |
| commit | 9140684333edd01ed10e53eca6bea33cf2c81431 (patch) | |
| tree | 920389ed5daed057c38852bc9a6adf66f4a9e6bb | |
| parent | e76351bcf4dd0c67a0d048b543f323fe8ce0cdc4 (diff) | |
| download | emacs-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.el | 4 |
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 |