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

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 6b4a824a9ad6842963e9d882f544993d8c8f7d70..da5c1708a97edde2503c75a522427bceffe3cbf2 100644 (file)
--- 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 1fccb6e8791fba9267da324cf25af535eac6afcc..18e33f2e3e98b839686f3d8ad5debaaf4ca63136 100644 (file)
--- 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)")))