(command-line): Set EOL mnemonics for the Mac.

2 files changed, 8 insertions, 2 deletions

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 6b4a824a9ad..da5c1708a97 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,7 @@
+2002-01-16  Andrew Choi  <akochoi@cse.cuhk.edu.hk>
+
+        * startup.el (command-line): Set EOL mnemonics for the Mac.
+
 2002-01-16  Andreas Schwab  <schwab@suse.de>
 
         * mail/feedmail.el (feedmail): Fix :link spec.
diff --git a/lisp/startup.el b/lisp/startup.el
index 1fccb6e8791..18e33f2e3e9 100644
--- a/lisp/startup.el
+++ b/lisp/startup.el
@@ -675,8 +675,10 @@ or `CVS', and any subdirectory that contains a file named `.nosearch'."
    ((memq system-type '(ms-dos windows-nt emx))
     (setq eol-mnemonic-unix "(Unix)")
     (setq eol-mnemonic-mac  "(Mac)"))
-   ;; Mac-specific settings should come here, once there's a
-   ;; system-type symbol specific to MacOS.
+   ;; Both Mac and Unix EOLs are now "native" on Mac OS so keep the
+   ;; abbreviated strings `/' and `:' set in coding.c for them.
+   ((eq system-type 'macos)
+    (setq eol-mnemonic-dos  "(DOS)"))
    (t   ; this is for Unix/GNU/Linux systems
     (setq eol-mnemonic-dos  "(DOS)")
     (setq eol-mnemonic-mac  "(Mac)")))