23.0.60; Default face in new frames

[Markus Triska <markus.triska@gmx.at>]

When I start "emacs -Q", and then evaluate the following form:

(custom-set-faces
   '(default ((t (:stipple nil :background "white" :foreground "black"
                  :inverse-video nil :box nil :strike-through nil
                  :overline nil :underline nil :slant normal :weight normal
                  :height 180 :width normal :family "adobe-courier"))) t))

The frame and face get bigger, as intended. When I then evaluate:

(switch-to-buffer-other-frame "new")

the new frame uses the old (smaller) default face again.

In contrast, when I start "emacs -Q", and then evaluate the form:

(progn
  (custom-set-faces
     '(default ((t (:stipple nil :background "white" :foreground "black"
                    :inverse-video nil :box nil :strike-through nil
                    :overline nil :underline nil :slant normal :weight normal
                    :height 180 :width normal :family "adobe-courier"))) t))
  (switch-to-buffer-other-frame "new"))

both the old and the new frame get the bigger default face.


In GNU Emacs 23.0.60.2 (i386-apple-darwin8.11.1, GTK+ Version 2.12.9)
 of 2008-04-05 on mt-computer.local
Windowing system distributor `The XFree86 Project, Inc', version 11.0.40400000
configured using `configure  '--disable-font-backend''

Important settings:
  value of $LC_ALL: nil
  value of $LC_COLLATE: nil
  value of $LC_CTYPE: nil
  value of $LC_MESSAGES: nil
  value of $LC_MONETARY: nil
  value of $LC_NUMERIC: nil
  value of $LC_TIME: nil
  value of $LANG: nil
  value of $XMODIFIERS: nil
  locale-coding-system: nil
  default-enable-multibyte-characters: t