]> git.eshelyaron.com Git - emacs.git/commitdiff
(command-line): Use w32-tty-standard-colors when in w32 console mode.
authorJason Rumney <jasonr@gnu.org>
Sun, 30 Jan 2000 19:02:51 +0000 (19:02 +0000)
committerJason Rumney <jasonr@gnu.org>
Sun, 30 Jan 2000 19:02:51 +0000 (19:02 +0000)
lisp/startup.el

index f910ea62feafe21cf97cced1f30492d78a6cd391..e0fac7127880fc7bc8e084605cea27c9502c7228 100644 (file)
@@ -749,9 +749,11 @@ or `CVS', and any subdirectory that contains a file named `.nosearch'."
   ;; terminal init file.
   (or (memq window-system '(x w32))
       (not (tty-display-color-p))
-      (let* ((colors (if (eq window-system 'pc)
-                        msdos-color-values
-                      tty-standard-colors))
+      (let* ((colors (cond ((eq window-system 'pc)
+                            msdos-color-values)
+                           ((eq system-type 'windows-nt)
+                            w32-tty-standard-colors)
+                           (t tty-standard-colors)))
             (color (car colors)))
        (while colors
          (tty-color-define (car color) (cadr color) (cddr color))