Mercurial > emacs
changeset 32649:47bf921bccd5
(frame-set-background-mode): `unspecified' &c are symbols, not strings.
| author | Miles Bader <miles@gnu.org> |
|---|---|
| date | Thu, 19 Oct 2000 08:36:13 +0000 |
| parents | dd02ab7a6392 |
| children | f0e772824ae9 |
| files | lisp/faces.el |
| diffstat | 1 files changed, 5 insertions(+), 3 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/faces.el Thu Oct 19 07:24:01 2000 +0000 +++ b/lisp/faces.el Thu Oct 19 08:36:13 2000 +0000 @@ -1304,7 +1304,9 @@ (defun frame-set-background-mode (frame) - "Set up the `background-mode' and `display-type' frame parameters for FRAME." + "Set up display-dependent faces on FRAME. +Display-dependent faces are those which have different definitions +according to the `background-mode' and `display-type' frame parameters." (let* ((bg-resource (and window-system (x-get-resource ".backgroundMode" "BackgroundMode"))) @@ -1318,9 +1320,9 @@ 'dark) ;; Unspecified frame background color can only happen ;; on tty's. - ((memq bg-color '("unspecified" "unspecified-bg")) + ((memq bg-color '(unspecified unspecified-bg)) 'dark) - ((eq bg-color "unspecified-fg") ; inverted colors + ((eq bg-color 'unspecified-fg) ; inverted colors 'light) ((>= (apply '+ (x-color-values bg-color frame)) ;; Just looking at the screen, colors whose