Mercurial > emacs
changeset 97665:8e20ddb5288c
(tty-register-default-colors): Remove bogus code for using msdos-color-values.
author | Eli Zaretskii <eliz@gnu.org> |
---|---|
date | Sat, 23 Aug 2008 17:00:21 +0000 |
parents | 5c57ca53d968 |
children | ed4b9c6c72c8 |
files | lisp/term/tty-colors.el |
diffstat | 1 files changed, 11 insertions(+), 11 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/term/tty-colors.el Sat Aug 23 16:59:51 2008 +0000 +++ b/lisp/term/tty-colors.el Sat Aug 23 17:00:21 2008 +0000 @@ -49,14 +49,16 @@ ;; color. ;; `tty-defined-color-alist' is created at startup by calling the -;; function `tty-color-define', defined below, passing it each -;; supported color, its index, and its RGB values. The standard list -;; of colors supported by many Unix color terminals, including xterm, -;; FreeBSD, and GNU/Linux, is supplied below in `tty-standard-colors'. -;; If your terminal supports different or additional colors, call -;; `tty-color-define' from your `.emacs' or `site-start.el'. For -;; more-or-less standard definitions of VGA text-mode colors, see the -;; beginning of lisp/term/pc-win.el. +;; function `tty-register-default-colors', defined below, which in +;; turn calls `tty-color-define', passing it each supported color, its +;; index, and its RGB values. The standard list of colors supported +;; by many Unix color terminals, including xterm, FreeBSD, and +;; GNU/Linux, is supplied below in `tty-standard-colors'. Some +;; terminal-specific files in lisp/term define their own standard +;; colors. If your terminal supports different or additional colors, +;; call `tty-color-define' from your `.emacs' or `site-start.el'. For +;; more-or-less standard definitions of VGA text-mode colors, see +;; lisp/term/pc-win.el. ;;; Code: @@ -811,9 +813,7 @@ (defun tty-register-default-colors () "Register the default set of colors for a character terminal." - (let* ((colors (cond ((eq window-system 'pc) - msdos-color-values) - (t tty-standard-colors))) + (let* ((colors tty-standard-colors) (color (car colors))) (while colors (tty-color-define (car color) (cadr color) (cddr color))