bug#849: 23.0.60; internal-set-alternative-font-family-alist

[martin rudalics]

When doing `emacs-lisp-byte-compile-and-load' for faces.el I am told

Debugger entered--Lisp error: (wrong-type-argument stringp Monospace)
  internal-set-alternative-font-family-alist(((Monospace courier fixed) 
(courier fixed) (Sans\ Serif helv helvetica arial fixed) (helv helvetica arial 
fixed)))
  #[(symbol value) "      \"         ! " [symbol value set-default 
internal-set-alternative-font-family-alist] 3](face-font-family-alternatives ((Monospace 
courier fixed) (courier fixed) (Sans\ Serif helv helvetica arial fixed) (helv helvetica arial 
fixed)))
  custom-initialize-reset(face-font-family-alternatives (quote (("Monospace" "courier" "fixed") ("courier" "fixed") ("Sans Serif" "helv" 
"helvetica" "arial" "fixed") ("helv" "helvetica" "arial" "fixed"))))
  custom-declare-variable(face-font-family-alternatives (quote (("Monospace" "courier" "fixed") ("courier" "fixed") ("Sans Serif" "helv" "helvetica" "arial" 
"fixed") ("helv" "helvetica" "arial" "fixed"))) ("c:/Programme/Emacs-trunk/lisp/faces.elc" . -1675) :tag "Alternative font families to try" :type (repeat (repeat string)) :group 
font-selection :set #[(symbol value) "     \"         ! " [symbol value set-default internal-set-alternative-font-family-alist] 3])
  load("c:/Programme/Emacs-trunk/lisp/faces.elc" nil nil t)
  load-file("c:/Programme/Emacs-trunk/lisp/faces.elc")
  emacs-lisp-byte-compile-and-load()
  call-interactively(emacs-lisp-byte-compile-and-load nil nil)


In GNU Emacs 23.0.60.1 (i386-mingw-nt5.1.2600)
 of 2008-09-01 on MACHNO
Windowing system distributor `Microsoft Corp.', version 5.1.2600
configured using `configure --with-gcc (3.4)'

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: ENU
  value of $XMODIFIERS: nil
  locale-coding-system: cp1252
  default-enable-multibyte-characters: t

Major mode: Emacs-Lisp

Minor modes in effect:
  eldoc-mode: t
  scroll-restore-mode: t
  regexp-lock-mode: t
  show-paren-mode: t
  tooltip-mode: t
  mouse-wheel-mode: t
  menu-bar-mode: t
  file-name-shadow-mode: t
  global-font-lock-mode: t
  font-lock-mode: t
  global-auto-composition-mode: t
  auto-composition-mode: t
  auto-encryption-mode: t
  auto-compression-mode: t
  temp-buffer-resize-mode: t
  column-number-mode: t
  line-number-mode: t
  transient-mark-mode: t

Recent input:
<M-apps> <down> <down> <down> <down> <down> <down>
<down> <down> <down> <down> <down> <down> <down> <down>
<down> <down> <down> <down> <down> <down> <down> <right>
M-+ <select-window> <select-window> <M-S-down> <up>
<S-down> <S-down> <S-down> <S-down> <S-down> <S-down>
<S-down> <S-down> <S-down> <S-down> <S-down> <S-down>
<S-down> <S-down> <S-down> <insert> <down-mouse-1>
<mouse-1> <help-echo> <help-echo> <help-echo> <help-echo>
<help-echo> <help-echo> <help-echo> <help-echo> <help-echo>
<help-echo> <help-echo> <help-echo> <help-echo> <help-echo>
<help-echo> <help-echo> <help-echo> <help-echo> <menu-bar>
<help-menu> <send-emacs-bug-report>

Recent messages:
Compiling c:/Programme/Emacs-trunk/lisp/faces.el...done
Wrote c:/Programme/Emacs-trunk/lisp/faces.elc
Loading c:/Programme/Emacs-trunk/lisp/faces.elc...
Entering debugger...
Mark set