# HG changeset patch
# User Miles Bader <miles@gnu.org>
# Date 971944573 0
# Node ID 47bf921bccd5c537f97740fe239c5b335ccfa6a0
# Parent  dd02ab7a6392423869a74221fc8c180e8c82c220
(frame-set-background-mode): `unspecified' &c are symbols, not strings.

diff -r dd02ab7a6392 -r 47bf921bccd5 lisp/faces.el
--- 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