Lines Matching +defs:color +defs:name
34 ;;; values were scaled up to 16 bits, as `tty-define-color' requires.
36 ;;; The mapping between the 16 standard EGA/VGA colors and X color names
39 ;;; define the pixel values are shown as comments to each color below.
42 ;;; of Emacs think that a color whose RGB values add up to less than 0.6 of
44 ;;; color is ``light''; see `frame-set-background-mode' in lisp/faces.el for
46 (defvar msdos-color-values
69 (tty-color-clear)
93 (fg (cdr (assq 'foreground-color params)))
94 (bg (cdr (assq 'background-color params))))
95 (if (equal fg (cdr (assq 'mouse-color params)))
97 (list (cons 'mouse-color bg))))
98 (if (equal fg (cdr (assq 'cursor-color params)))
100 (list (cons 'cursor-color bg)))))))
103 ;; tty-color-alist, since msdos-handle-reverse-video needs to know the
104 ;; actual frame colors. tty-color-alist is set up by startup.el, but
149 (defun x-display-color-cells (&optional frame) 16)
157 (defun x-display-visual-class (&optional frame) 'static-color)
162 (defvar x-display-name "pc"
163 "The display name specifying the MS-DOS display and frame type.")
165 (defvar x-colors (mapcar 'car msdos-color-values)
238 (fset 'set-mouse-color 'ignore) ; We cannot, I think.
239 (fset 'set-cursor-color 'ignore) ; Hardware determined by char under.
240 (fset 'set-border-color 'ignore) ; Not useful.