martin/emacs
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

(frame-set-background-mode): `unspecified' &c are symbols, not strings.

Browse Source
This commit is contained in:
Miles Bader
2000-10-19 08:37:11 +00:00
parent e8bce0a9b6
commit d8abcd91a3
2 changed files with 10 additions and 3 deletions
Download Patch File Download Diff File Expand all files Collapse all files

5
lisp/ChangeLog
View File

@@ -1,3 +1,8 @@
2000-10-19 Miles Bader <miles@lsi.nec.co.jp>
* faces.el (frame-set-background-mode): `unspecified' &c are
symbols, not strings.
2000-10-19 Eli Zaretskii <eliz@is.elta.co.il>
* term/tty-colors.el (color-name-rgb-alist): Add a comment

8
lisp/faces.el
View File

@@ -1304,7 +1304,9 @@ this won't have the expected effect."
(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 @@ this won't have the expected effect."
'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