Mercurial > hg > xemacs-beta

diff lisp/x11/x-faces.el @ 26:441bb1e64a06 r19-15b96

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Import from CVS: tag r19-15b96
author cvs
date Mon, 13 Aug 2007 08:51:32 +0200
parents 376386a54a3c
children 1917ad0d78d7
line wrap: on
line diff
--- a/lisp/x11/x-faces.el	Mon Aug 13 08:51:05 2007 +0200
+++ b/lisp/x11/x-faces.el	Mon Aug 13 08:51:32 2007 +0200
@@ -495,7 +495,7 @@
   (or (face-foreground 'default 'global)
       (set-face-foreground 'default "black" 'global 'x))
   (or (face-background 'default 'global)
-      (set-face-background 'default "white" 'global 'x)))
+      (set-face-background 'default "gray80" 'global 'x)))
 
 ;;; x-init-device-faces is responsible for initializing default
 ;;; values for faces on a newly created device.
@@ -577,8 +577,8 @@
 	    (progn
 	      (or fg (set-face-foreground 'default "white" device))
 	      (or bg (set-face-background 'default "black" device)))
-	  (or fg (set-face-foreground 'default "black" device))
-	  (or bg (set-face-background 'default "white" device)))))
+	  (or fg (set-face-foreground 'default "white" device))
+	  (or bg (set-face-background 'default "black" device)))))
 
   ;; Don't look at reverseVideo now or initialize the modeline.  This
   ;; is done on a per-frame basis at the appropriate time.