[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] Changes to emacs/lisp/term/tty-colors.el,v
From: |
Eli Zaretskii |
Subject: |
[Emacs-diffs] Changes to emacs/lisp/term/tty-colors.el,v |
Date: |
Sat, 23 Aug 2008 17:00:22 +0000 |
CVSROOT: /cvsroot/emacs
Module name: emacs
Changes by: Eli Zaretskii <eliz> 08/08/23 17:00:21
Index: tty-colors.el
===================================================================
RCS file: /cvsroot/emacs/emacs/lisp/term/tty-colors.el,v
retrieving revision 1.26
retrieving revision 1.27
diff -u -b -r1.26 -r1.27
--- tty-colors.el 6 May 2008 04:34:22 -0000 1.26
+++ tty-colors.el 23 Aug 2008 17:00:21 -0000 1.27
@@ -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))
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [Emacs-diffs] Changes to emacs/lisp/term/tty-colors.el,v,
Eli Zaretskii <=