]> git.eshelyaron.com Git - emacs.git/commitdiff
(widget-field-face, widget-single-line-field-face):
authorEli Zaretskii <eliz@gnu.org>
Wed, 17 Oct 2001 18:41:54 +0000 (18:41 +0000)
committerEli Zaretskii <eliz@gnu.org>
Wed, 17 Oct 2001 18:41:54 +0000 (18:41 +0000)
Define special colors for a tty.

lisp/ChangeLog
lisp/wid-edit.el

index 93e13ccf68435110d2616389d53f30520c099c50..3eeccf09441ebb37f57ac4ced6f0fa84373c7ffa 100644 (file)
@@ -1,3 +1,8 @@
+2001-10-17  Eli Zaretskii  <eliz@is.elta.co.il>
+
+       * wid-edit.el (widget-field-face, widget-single-line-field-face):
+       Define special colors for a tty.
+
 2001-10-17  Miles Bader  <miles@gnu.org>
 
        * custom.el (defface): Mention `:inherit' in doc-string.
index dad3082ace6e5f5457bce12a48eb37081462c787..71af16d28bfb2946d16ef218a79137056231e792 100644 (file)
@@ -120,7 +120,12 @@ This exists as a variable so it can be set locally in certain buffers.")
   :type 'face
   :group 'widget-faces)
 
-(defface widget-field-face '((((class grayscale color)
+;; TTY gets special definitions here and in the next defface, because
+;; the gray colors defined for other displays cause black text on a black
+;; background, at least on light-background TTYs.
+(defface widget-field-face '((((type tty))
+                             (:background "yellow3"))
+                            (((class grayscale color)
                               (background light))
                              (:background "gray85"))
                             (((class grayscale color)
@@ -131,7 +136,9 @@ This exists as a variable so it can be set locally in certain buffers.")
   "Face used for editable fields."
   :group 'widget-faces)
 
-(defface widget-single-line-field-face '((((class grayscale color)
+(defface widget-single-line-field-face '((((type tty))
+                                         (:background "green3"))
+                                        (((class grayscale color)
                                           (background light))
                                          (:background "gray85"))
                                         (((class grayscale color)