Re: 23.0.50; face-problems with multy-tty

[Dan Nicolaescu]

Tassilo Horn <address@hidden> writes:

  > Since multi-tty has been merged, I start emacs as a detached server with
  > screen.  Here's the command line I use to reproduce the problem:
  > 
  >   screen -d -m -S test emacs -nw --eval "(setq server-name \"test\")" \
  >          -Q -l foo.el --funcall server-start
  > 
  > The file foo.el contains my custom-set-faces:
  > 
  > --8<---------------cut here---------------start------------->8---
  > (custom-set-faces
  >   ;; custom-set-faces was added by Custom.
  >   ;; If you edit it by hand, you could mess it up, so be careful.
  >   ;; Your init file should contain only one such instance.
  >   ;; If there is more than one, they won't work right.
  >  '(circe-highlight-all-nicks-face ((t (:foreground "blue"))))
  >  '(circe-highlight-nick-face ((t (:background "grey" :foreground "blue" 
:weight bold))))
  >  '(circe-my-message-face ((t (:background "grey"))))
  >  '(circe-originator-face ((t (:weight bold))))
  >  '(company-pseudo-tooltip-face ((t (:inherit default :background "yellow" 
:foreground "black"))))
  >  '(diff-added ((t (:inherit diff-changed :background "green"))))
  >  '(diff-changed ((nil (:background "lightblue"))))
  >  '(diff-removed ((t (:inherit diff-changed :background "orange"))))
  >  '(diredp-exec-priv ((t (:background "LightSteelBlue" :foreground 
"black"))))
  >  '(diredp-no-priv ((t (:background "LightGray" :foreground "black"))))
  >  '(diredp-read-priv ((t (:background "MediumAquamarine" :foreground 
"black"))))
  >  '(diredp-write-priv ((t (:background "Orchid" :foreground "black"))))
  >  '(emms-browser-album-face ((((class color) (background light)) (:inherit 
org-level-2))))
  >  '(emms-browser-artist-face ((((class color) (background light)) (:inherit 
org-level-1))))
  >  '(emms-browser-track-face ((((class color) (background light)) (:inherit 
org-level-3 :weight normal))))
  >  '(font-lock-string-face ((((class color) (min-colors 88) (background 
light)) (:foreground "RosyBrown4"))))
  >  '(gnus-group-mail-3 ((t (:foreground "magenta" :weight bold))))
  >  '(gnus-group-mail-3-empty ((nil (:inherit gnus-group-mail-3 :weight 
normal))))
  >  '(gnus-group-news-3 ((t (:foreground "blue" :weight bold))))
  >  '(gnus-group-news-3-empty ((nil (:inherit gnus-group-news-3 :weight 
normal))))
  >  '(gnus-server-denied ((t (:foreground "red" :weight bold))))
  >  '(gnus-signature ((t (:foreground "blue" :slant italic))))
  >  '(header-line ((default nil) (((class color grayscale) (background light)) 
(:background "grey90" :foreground "grey20" :box nil))))
  >  '(hl-line ((t (:inherit highlight :background "#BEFFBE"))))
  >  '(message-header-name ((nil (:inherit gnus-header-name))))
  >  '(mode-line ((nil (:background "black" :foreground "grey80" :height 0.8 
:family "helvetica"))))
  >  '(mode-line-buffer-id ((t (:background "grey10" :foreground "grey90" 
:weight bold))))
  >  '(mode-line-inactive ((default (:inherit mode-line :background "grey80" 
:foreground "grey20")) (((class color) (min-colors 88) (background light)) 
(:weight light))))
  >  '(newsticker-feed-face ((t (:inherit org-level-1 :underline t))))
  >  '(newsticker-immortal-item-face ((t (:inherit newsticker-new-item-face 
:foreground "blue"))))
  >  '(newsticker-new-item-face ((t (:foreground "black" :weight normal))))
  >  '(newsticker-obsolete-item-face ((t (:inherit newsticker-new-item-face 
:strike-through t))))
  >  '(newsticker-old-item-face ((t (:inherit newsticker-new-item-face 
:foreground "grey60"))))
  >  '(org-level-1 ((t (:foreground "Blue1" :weight bold))))
  >  '(org-level-2 ((t (:foreground "DarkGoldenrod" :weight bold))))
  >  '(org-level-3 ((t (:foreground "Purple" :weight bold))))
  >  '(org-level-4 ((t (:foreground "Firebrick" :weight bold))))
  >  '(org-level-5 ((t (:foreground "ForestGreen" :weight bold))))
  >  '(org-level-6 ((t (:foreground "CadetBlue" :weight bold))))
  >  '(org-level-7 ((t (:foreground "Orchid" :weight bold))))
  >  '(org-level-8 ((t (:foreground "RosyBrown" :weight bold))))
  >  '(outline-1 ((t (:inherit org-level-1))))
  >  '(outline-2 ((t (:inherit org-level-2))))
  >  '(outline-3 ((t (:inherit org-level-3))))
  >  '(outline-4 ((t (:inherit org-level-4))))
  >  '(outline-5 ((t (:inherit org-level-5))))
  >  '(outline-6 ((t (:inherit org-level-6))))
  >  '(outline-7 ((t (:inherit org-level-7))))
  >  '(outline-8 ((t (:inherit org-level-8))))
  >  '(region ((t (:background "paleturquoise"))))
  >  '(tooltip ((((class color)) (:inherit variable-pitch :background 
"lightblue" :foreground "black" :family "fixed"))))
  >  '(trailing-whitespace ((nil (:background "grey80"))))
  >  '(window-number-face ((((type x w32 mac)) (:foreground "red" :weight 
bold)))))
  > --8<---------------cut here---------------end--------------->8---
  > 
  > Now I connect to that server with
  > 
  >     emacsclient -s test
  > 
  > which opens a new X11 frame.  Now all faces whose value doesn't start
  > with t or nil use the default face, e.g. all strings ("foo") in an elisp
  > file are simply black on white.  If I do `M-x customize-face RET RET' on
  > one of them, I see that `font-lock-string-face' has no customizations at
  > all (no checked boxes or inherited faces).  But ((class color)
  > (min-colors 88) (background light)) applies to this X11 frame.  It has a
  > white background and supports far more than 88 colors.
  > 
  > If I hit `C-x C-e' after the (custom-set-faces ...) section, all faces
  > work as expected again.
  > 
  > Ah, and the face of the buttons in the customize interface doesn't use
  > boxes, it's only underlined (Custom Button Unraised), because
  > `custom-raised-buttons' is nil.  IMHO in an X11 frame client it should
  > default to t, so that there are no user-visible differences between a
  > client using a X11 frame and a normal X11 emacs instance.

Can you please try to run "make maintainer-clean" and then configure
and make bootstrap? I have seen a very similar problem that was fixed
that way.