infinite loop when customizing default face

[Ryan Shaw]

In GNU Emacs 21.2.1 (i586-pc-linux-gnu, X toolkit)
 of 2002-05-22 on momo
configured using `configure  --host=i586-pc-linux-gnu --prefix=/usr
--libexecdir=/usr/lib --mandir=/usr/share/man --infodir=/usr/share/info
--with-x --with-xpm --with-jpeg --with-tiff --with-gif --with-png'
Important settings:
  value of $LC_ALL: nil
  value of $LC_COLLATE: nil
  value of $LC_CTYPE: ja_JP.eucJP
  value of $LC_MESSAGES: nil
  value of $LC_MONETARY: nil
  value of $LC_NUMERIC: nil
  value of $LC_TIME: nil
  value of $LANG: nil
  locale-coding-system: japanese-iso-8bit
  default-enable-multibyte-characters: t

Please describe exactly what actions triggered the bug
and the precise symptoms of the bug:

When I attempt to customize the default face via M-x customize-face,
Emacs begins resizing itself wildly, before finally showing the error
"Variable binding depth exceeds max-specpdl-size". The default face
remains unchanged. See the backtrace below.

Backtrace:
Debugger entered--Lisp error: (error "Variable binding depth exceeds
max-specpdl-size")
  face-spec-choose((((... ...) (:foreground "light blue" :bold t :height
1.2)) ((... ...) (:foreground "blue" :bold t :height 1.2)) (t (:bold
t))) #<frame emacs@momo 0x8470e48\ >)
  face-spec-set(custom-group-tag-face (((... ...) (:foreground "light
blue" :bold t :height 1.2)) ((... ...) (:foreground "blue" :bold t
:height 1.2)) (t (:bold t))) #<frame emacs@momo 0x8470e48\ >)
  face-set-after-frame-default(#<frame emacs@momo 0x8470e48\ >)
  internal-set-lisp-face-attribute(default :height 110 #<frame
emacs@momo 0x8470e48\ >)
  set-face-attribute(default #<frame emacs@momo 0x8470e48\ > :height
110)
  face-spec-set(default ((t (:stipple nil :background "#4D5259"
:foreground "#BFC7D9" :inverse-video nil :box nil :strike-through nil
:overline nil :underline nil :slant normal :weight normal :height 110
:width normal :family "adobe-courier"))) #<frame emacs@momo 0x8470e48\
>)
  face-set-after-frame-default(#<frame emacs@momo 0x8470e48\ >)
  internal-set-lisp-face-attribute(default :family "adobe-courier"
#<frame emacs@momo 0x8470e48\ >)
  set-face-attribute(default #<frame emacs@momo 0x8470e48\ > :family
"adobe-courier")
  face-spec-set(default ((t (:stipple nil :background "#4D5259"
:foreground "#BFC7D9" :inverse-video nil :box nil :strike-through nil
:overline nil :underline nil :slant normal :weight normal :height 110
:width normal :family "adobe-courier"))) #<frame emacs@momo 0x8470e48\
>)
  face-set-after-frame-default(#<frame emacs@momo 0x8470e48\ >)
  internal-set-lisp-face-attribute(default :family "adobe-courier"
#<frame emacs@momo 0x8470e48\ >)
  set-face-attribute(default #<frame emacs@momo 0x8470e48\ > :family
"adobe-courier")
  face-spec-set(default ((t (:stipple nil :background "#4D5259"
:foreground "#BFC7D9" :inverse-video nil :box nil :strike-through nil
:overline nil :underline nil :slant normal :weight normal :height 110
:width normal :family "adobe-courier"))) #<frame emacs@momo 0x8470e48\
>)
  face-set-after-frame-default(#<frame emacs@momo 0x8470e48\ >)
  internal-set-lisp-face-attribute(default :family "adobe-courier"
#<frame emacs@momo 0x8470e48\ >)
  set-face-attribute(default #<frame emacs@momo 0x8470e48\ > :family
"adobe-courier")
  face-spec-set(default ((t (:stipple nil :background "#4D5259"
:foreground "#BFC7D9" :inverse-video nil :box nil :strike-through nil
:overline nil :underline nil :slant normal :weight normal :height 110
:width normal :family "adobe-courier"))) #<frame emacs@momo 0x8470e48\
>)
  face-set-after-frame-default(#<frame emacs@momo 0x8470e48\ >)
  internal-set-lisp-face-attribute(default :family "adobe-courier"
#<frame emacs@momo 0x8470e48\ >)
  set-face-attribute(default #<frame emacs@momo 0x8470e48\ > :family
"adobe-courier")
  face-spec-set(default ((t (:stipple nil :background "#4D5259"
:foreground "#BFC7D9" :inverse-video nil :box nil :strike-through nil
:overline nil :underline nil :slant normal :weight normal :height 110
:width normal :family "adobe-courier"))) #<frame emacs@momo 0x8470e48\
>)
  face-set-after-frame-default(#<frame emacs@momo 0x8470e48\ >)
  internal-set-lisp-face-attribute(default :family "adobe-courier"
#<frame emacs@momo 0x8470e48\ >)
  set-face-attribute(default #<frame emacs@momo 0x8470e48\ > :family
"adobe-courier")
  face-spec-set(default ((t (:stipple nil :background "#4D5259"
:foreground "#BFC7D9" :inverse-video nil :box nil :strike-through nil
:overline nil :underline nil :slant normal :weight normal :height 110
:width normal :family "adobe-courier"))) #<frame emacs@momo 0x8470e48\
>)
  face-set-after-frame-default(#<frame emacs@momo 0x8470e48\ >)
  internal-set-lisp-face-attribute(default :family "adobe-courier"
#<frame emacs@momo 0x8470e48\ >)
  set-face-attribute(default #<frame emacs@momo 0x8470e48\ > :family
"adobe-courier")
  face-spec-set(default ((t (:stipple nil :background "#4D5259"
:foreground "#BFC7D9" :inverse-video nil :box nil :strike-through nil
:overline nil :underline nil :slant normal :weight normal :height 110
:width normal :family "adobe-courier"))) #<frame emacs@momo 0x8470e48\
>)
  face-set-after-frame-default(#<frame emacs@momo 0x8470e48\ >)
  internal-set-lisp-face-attribute(default :family "adobe-courier"
#<frame emacs@momo 0x8470e48\ >)
  set-face-attribute(default #<frame emacs@momo 0x8470e48\ > :family
"adobe-courier")
  face-spec-set(default ((t (:stipple nil :background "#4D5259"
:foreground "#BFC7D9" :inverse-video nil :box nil :strike-through nil
:overline nil :underline nil :slant normal :weight normal :height 110
:width normal :family "adobe-courier"))) #<frame emacs@momo 0x8470e48\
>)
  face-set-after-frame-default(#<frame emacs@momo 0x8470e48\ >)
  internal-set-lisp-face-attribute(default :family "adobe-courier"
#<frame emacs@momo 0x8470e48\ >)
  set-face-attribute(default #<frame emacs@momo 0x8470e48\ > :family
"adobe-courier")
  face-spec-set(default ((t (:stipple nil :background "#4D5259"
:foreground "#BFC7D9" :inverse-video nil :box nil :strike-through nil
:overline nil :underline nil :slant normal :weight normal :height 110
:width normal :family "adobe-courier"))) #<frame emacs@momo 0x8470e48\
>)
  face-set-after-frame-default(#<frame emacs@momo 0x8470e48\ >)
  internal-set-lisp-face-attribute(default :family "adobe-courier"
#<frame emacs@momo 0x8470e48\ >)
  set-face-attribute(default #<frame emacs@momo 0x8470e48\ > :family
"adobe-courier")
  face-spec-set(default ((t (:stipple nil :background "#4D5259"
:foreground "#BFC7D9" :inverse-video nil :box nil :strike-through nil
:overline nil :underline nil :slant normal :weight normal :height 110
:width normal :family "adobe-courier"))) #<frame emacs@momo 0x8470e48\
>)
  face-set-after-frame-default(#<frame emacs@momo 0x8470e48\ >)
  internal-set-lisp-face-attribute(default :family "adobe-courier"
#<frame emacs@momo 0x8470e48\ >)
  set-face-attribute(default #<frame emacs@momo 0x8470e48\ > :family
"adobe-courier")
  face-spec-set(default ((t (:stipple nil :background "#4D5259"
:foreground "#BFC7D9" :inverse-video nil :box nil :strike-through nil
:overline nil :underline nil :slant normal :weight normal :height 110
:width normal :family "adobe-courier"))) #<frame emacs@momo 0x8470e48\
>)
  face-set-after-frame-default(#<frame emacs@momo 0x8470e48\ >)
  internal-set-lisp-face-attribute(default :family "adobe-courier"
#<frame emacs@momo 0x8470e48\ >)
  set-face-attribute(default #<frame emacs@momo 0x8470e48\ > :family
"adobe-courier")
  face-spec-set(default ((t (:stipple nil :background "#4D5259"
:foreground "#BFC7D9" :inverse-video nil :box nil :strike-through nil
:overline nil :underline nil :slant normal :weight normal :height 110
:width normal :family "adobe-courier"))) #<frame emacs@momo 0x8470e48\
>)
  face-set-after-frame-default(#<frame emacs@momo 0x8470e48\ >)
  internal-set-lisp-face-attribute(default :family "adobe-courier"
#<frame emacs@momo 0x8470e48\ >)
  set-face-attribute(default #<frame emacs@momo 0x8470e48\ > :family
"adobe-courier")
  face-spec-set(default ((t (:stipple nil :background "#4D5259"
:foreground "#BFC7D9" :inverse-video nil :box nil :strike-through nil
:overline nil :underline nil :slant normal :weight normal :height 110
:width normal :family "adobe-courier"))) #<frame emacs@momo 0x8470e48\
>)
  face-set-after-frame-default(#<frame emacs@momo 0x8470e48\ >)
  internal-set-lisp-face-attribute(default :family "adobe-courier"
#<frame emacs@momo 0x8470e48\ >)
  set-face-attribute(default #<frame emacs@momo 0x8470e48\ > :family
"adobe-courier")
  face-spec-set(default ((t (:stipple nil :background "#4D5259"
:foreground "#BFC7D9" :inverse-video nil :box nil :strike-through nil
:overline nil :underline nil :slant normal :weight normal :height 110
:width normal :family "adobe-courier"))) #<frame emacs@momo 0x8470e48\
>)
  face-set-after-frame-default(#<frame emacs@momo 0x8470e48\ >)
  internal-set-lisp-face-attribute(default :family "adobe-courier"
#<frame emacs@momo 0x8470e48\ >)
  set-face-attribute(default #<frame emacs@momo 0x8470e48\ > :family
"adobe-courier")
  face-spec-set(default ((t (:stipple nil :background "#4D5259"
:foreground "#BFC7D9" :inverse-video nil :box nil :strike-through nil
:overline nil :underline nil :slant normal :weight normal :height 110
:width normal :family "adobe-courier"))) #<frame emacs@momo 0x8470e48\
>)
  face-set-after-frame-default(#<frame emacs@momo 0x8470e48\ >)
  internal-set-lisp-face-attribute(default :family "adobe-courier"
#<frame emacs@momo 0x8470e48\ >)
  set-face-attribute(default #<frame emacs@momo 0x8470e48\ > :family
"adobe-courier")
  face-spec-set(default ((t (:stipple nil :background "#4D5259"
:foreground "#BFC7D9" :inverse-video nil :box nil :strike-through nil
:overline nil :underline nil :slant normal :weight normal :height 110
:width normal :family "adobe-courier"))) #<frame emacs@momo 0x8470e48\
>)
  face-set-after-frame-default(#<frame emacs@momo 0x8470e48\ >)
  internal-set-lisp-face-attribute(default :family "adobe-courier"
#<frame emacs@momo 0x8470e48\ >)
  set-face-attribute(default #<frame emacs@momo 0x8470e48\ > :family
"adobe-courier")
  face-spec-set(default ((t (:stipple nil :background "#4D5259"
:foreground "#BFC7D9" :inverse-video nil :box nil :strike-through nil
:overline nil :underline nil :slant normal :weight normal :height 110
:width normal :family "adobe-courier"))) #<frame emacs@momo 0x8470e48\
>)
  face-set-after-frame-default(#<frame emacs@momo 0x8470e48\ >)
  internal-set-lisp-face-attribute(default :family "adobe-courier"
#<frame emacs@momo 0x8470e48\ >)
  set-face-attribute(default #<frame emacs@momo 0x8470e48\ > :family
"adobe-courier")
  face-spec-set(default ((t (:stipple nil :background "#4D5259"
:foreground "#BFC7D9" :inverse-video nil :box nil :strike-through nil
:overline nil :underline nil :slant normal :weight normal :height 110
:width normal :family "adobe-courier"))) #<frame emacs@momo 0x8470e48\
>)
  face-set-after-frame-default(#<frame emacs@momo 0x8470e48\ >)
  internal-set-lisp-face-attribute(default :family "adobe-courier"
#<frame emacs@momo 0x8470e48\ >)
  set-face-attribute(default #<frame emacs@momo 0x8470e48\ > :family
"adobe-courier")
  face-spec-set(default ((t (:stipple nil :background "#4D5259"
:foreground "#BFC7D9" :inverse-video nil :box nil :strike-through nil
:overline nil :underline nil :slant normal :weight normal :height 110
:width normal :family "adobe-courier"))) #<frame emacs@momo 0x8470e48\
>)
  face-set-after-frame-default(#<frame emacs@momo 0x8470e48\ >)
  internal-set-lisp-face-attribute(default :family "adobe-courier"
#<frame emacs@momo 0x8470e48\ >)
  set-face-attribute(default #<frame emacs@momo 0x8470e48\ > :family
"adobe-courier")
  face-spec-set(default ((t (:stipple nil :background "#4D5259"
:foreground "#BFC7D9" :inverse-video nil :box nil :strike-through nil
:overline nil :underline nil :slant normal :weight normal :height 110
:width normal :family "adobe-courier"))) #<frame emacs@momo 0x8470e48\
>)
  face-set-after-frame-default(#<frame emacs@momo 0x8470e48\ >)
  internal-set-lisp-face-attribute(default :family "adobe-courier"
#<frame emacs@momo 0x8470e48\ >)
  set-face-attribute(default #<frame emacs@momo 0x8470e48\ > :family
"adobe-courier")
  face-spec-set(default ((t (:stipple nil :background "#4D5259"
:foreground "#BFC7D9" :inverse-video nil :box nil :strike-through nil
:overline nil :underline nil :slant normal :weight normal :height 110
:width normal :family "adobe-courier"))) #<frame emacs@momo 0x8470e48\
>)
  face-set-after-frame-default(#<frame emacs@momo 0x8470e48\ >)
  internal-set-lisp-face-attribute(default :family "adobe-courier"
#<frame emacs@momo 0x8470e48\ >)
  set-face-attribute(default #<frame emacs@momo 0x8470e48\ > :family
"adobe-courier")
  face-spec-set(default ((t (:stipple nil :background "#4D5259"
:foreground "#BFC7D9" :inverse-video nil :box nil :strike-through nil
:overline nil :underline nil :slant normal :weight normal :height 110
:width normal :family "adobe-courier"))) #<frame emacs@momo 0x8470e48\
>)
  face-set-after-frame-default(#<frame emacs@momo 0x8470e48\ >)
  internal-set-lisp-face-attribute(default :family "adobe-courier"
#<frame emacs@momo 0x8470e48\ >)
  set-face-attribute(default #<frame emacs@momo 0x8470e48\ > :family
"adobe-courier")
  face-spec-set(default ((t (:stipple nil :background "#4D5259"
:foreground "#BFC7D9" :inverse-video nil :box nil :strike-through nil
:overline nil :underline nil :slant normal :weight normal :height 110
:width normal :family "adobe-courier"))) #<frame emacs@momo 0x8470e48\
>)
  face-set-after-frame-default(#<frame emacs@momo 0x8470e48\ >)
  internal-set-lisp-face-attribute(default :family "adobe-courier"
#<frame emacs@momo 0x8470e48\ >)
  set-face-attribute(default #<frame emacs@momo 0x8470e48\ > :family
"adobe-courier")
  face-spec-set(default ((t (:stipple nil :background "#4D5259"
:foreground "#BFC7D9" :inverse-video nil :box nil :strike-through nil
:overline nil :underline nil :slant normal :weight normal :height 110
:width normal :family "adobe-courier"))) #<frame emacs@momo 0x8470e48\
>)
  face-set-after-frame-default(#<frame emacs@momo 0x8470e48\ >)
  internal-set-lisp-face-attribute(default :family "adobe-courier"
#<frame emacs@momo 0x8470e48\ >)
  set-face-attribute(default #<frame emacs@momo 0x8470e48\ > :family
"adobe-courier")
  face-spec-set(default ((t (:stipple nil :background "#4D5259"
:foreground "#BFC7D9" :inverse-video nil :box nil :strike-through nil
:overline nil :underline nil :slant normal :weight normal :height 110
:width normal :family "adobe-courier"))) #<frame emacs@momo 0x8470e48\
>)
  face-set-after-frame-default(#<frame emacs@momo 0x8470e48\ >)
  internal-set-lisp-face-attribute(default :family "adobe-courier"
#<frame emacs@momo 0x8470e48\ >)
  set-face-attribute(default #<frame emacs@momo 0x8470e48\ > :family
"adobe-courier")
  face-spec-set(default ((t (:stipple nil :background "#4D5259"
:foreground "#BFC7D9" :inverse-video nil :box nil :strike-through nil
:overline nil :underline nil :slant normal :weight normal :height 110
:width normal :family "adobe-courier"))) #<frame emacs@momo 0x8470e48\
>)
  face-set-after-frame-default(#<frame emacs@momo 0x8470e48\ >)
  internal-set-lisp-face-attribute(default :family "adobe-courier"
#<frame emacs@momo 0x8470e48\ >)
  set-face-attribute(default #<frame emacs@momo 0x8470e48\ > :family
"adobe-courier")
  face-spec-set(default ((t (:stipple nil :background "#4D5259"
:foreground "#BFC7D9" :inverse-video nil :box nil :strike-through nil
:overline nil :underline nil :slant normal :weight normal :height 110
:width normal :family "adobe-courier"))) #<frame emacs@momo 0x8470e48\
>)
  face-set-after-frame-default(#<frame emacs@momo 0x8470e48\ >)
  internal-set-lisp-face-attribute(default :family "adobe-courier"
#<frame emacs@momo 0x8470e48\ >)
  set-face-attribute(default #<frame emacs@momo 0x8470e48\ > :family
"adobe-courier")
  face-spec-set(default ((t (:stipple nil :background "#4D5259"
:foreground "#BFC7D9" :inverse-video nil :box nil :strike-through nil
:overline nil :underline nil :slant normal :weight normal :height 110
:width normal :family "adobe-courier"))) #<frame emacs@momo 0x8470e48\
>)
  face-set-after-frame-default(#<frame emacs@momo 0x8470e48\ >)
  internal-set-lisp-face-attribute(default :family "adobe-courier"
#<frame emacs@momo 0x8470e48\ >)
  set-face-attribute(default #<frame emacs@momo 0x8470e48\ > :family
"adobe-courier")
  face-spec-set(default ((t (:stipple nil :background "#4D5259"
:foreground "#BFC7D9" :inverse-video nil :box nil :strike-through nil
:overline nil :underline nil :slant normal :weight normal :height 110
:width normal :family "adobe-courier"))) #<frame emacs@momo 0x8470e48\
>)
  face-set-after-frame-default(#<frame emacs@momo 0x8470e48\ >)
  internal-set-lisp-face-attribute(default :family "adobe-courier"
#<frame emacs@momo 0x8470e48\ >)
  set-face-attribute(default #<frame emacs@momo 0x8470e48\ > :family
"adobe-courier")
  face-spec-set(default ((t (:stipple nil :background "#4D5259"
:foreground "#BFC7D9" :inverse-video nil :box nil :strike-through nil
:overline nil :underline nil :slant normal :weight normal :height 110
:width normal :family "adobe-courier"))) #<frame emacs@momo 0x8470e48\
>)
  face-set-after-frame-default(#<frame emacs@momo 0x8470e48\ >)
  internal-set-lisp-face-attribute(default :family "adobe-courier"
#<frame emacs@momo 0x8470e48\ >)
  set-face-attribute(default #<frame emacs@momo 0x8470e48\ > :family
"adobe-courier")
  face-spec-set(default ((t (:stipple nil :background "#4D5259"
:foreground "#BFC7D9" :inverse-video nil :box nil :strike-through nil
:overline nil :underline nil :slant normal :weight normal :height 110
:width normal :family "adobe-courier"))) #<frame emacs@momo 0x8470e48\
>)
  face-set-after-frame-default(#<frame emacs@momo 0x8470e48\ >)
  internal-set-lisp-face-attribute(default :family "adobe-courier"
#<frame emacs@momo 0x8470e48\ >)
  set-face-attribute(default #<frame emacs@momo 0x8470e48\ > :family
"adobe-courier")
  face-spec-set(default ((t (:stipple nil :background "#4D5259"
:foreground "#BFC7D9" :inverse-video nil :box nil :strike-through nil
:overline nil :underline nil :slant normal :weight normal :height 110
:width normal :family "adobe-courier"))) #<frame emacs@momo 0x8470e48\
>)
  face-set-after-frame-default(#<frame emacs@momo 0x8470e48\ >)
  internal-set-lisp-face-attribute(default :family "adobe-courier"
#<frame emacs@momo 0x8470e48\ >)
  set-face-attribute(default #<frame emacs@momo 0x8470e48\ > :family
"adobe-courier")
  face-spec-set(default ((t (:stipple nil :background "#4D5259"
:foreground "#BFC7D9" :inverse-video nil :box nil :strike-through nil
:overline nil :underline nil :slant normal :weight normal :height 110
:width normal :family "adobe-courier"))) #<frame emacs@momo 0x8470e48\
>)
  face-set-after-frame-default(#<frame emacs@momo 0x8470e48\ >)
  internal-set-lisp-face-attribute(default :family "adobe-courier"
#<frame emacs@momo 0x8470e48\ >)
  set-face-attribute(default #<frame emacs@momo 0x8470e48\ > :family
"adobe-courier")
  face-spec-set(default ((t (:stipple nil :background "#4D5259"
:foreground "#BFC7D9" :inverse-video nil :box nil :strike-through nil
:overline nil :underline nil :slant normal :weight normal :height 110
:width normal :family "adobe-courier"))) #<frame emacs@momo 0x8470e48\
>)
  face-set-after-frame-default(#<frame emacs@momo 0x8470e48\ >)
  internal-set-lisp-face-attribute(default :family "adobe-courier"
#<frame emacs@momo 0x8470e48\ >)
  set-face-attribute(default #<frame emacs@momo 0x8470e48\ > :family
"adobe-courier")
  face-spec-set(default ((t (:stipple nil :background "#4D5259"
:foreground "#BFC7D9" :inverse-video nil :box nil :strike-through nil
:overline nil :underline nil :slant normal :weight normal :height 110
:width normal :family "adobe-courier"))) #<frame emacs@momo 0x8470e48\
>)
  face-set-after-frame-default(#<frame emacs@momo 0x8470e48\ >)
  internal-set-lisp-face-attribute(default :family "adobe-courier"
#<frame emacs@momo 0x8470e48\ >)
  set-face-attribute(default #<frame emacs@momo 0x8470e48\ > :family
"adobe-courier")
  face-spec-set(default ((t (:stipple nil :background "#4D5259"
:foreground "#BFC7D9" :inverse-video nil :box nil :strike-through nil
:overline nil :underline nil :slant normal :weight normal :height 110
:width normal :family "adobe-courier"))) #<frame emacs@momo 0x8470e48\
>)
  face-set-after-frame-default(#<frame emacs@momo 0x8470e48\ >)
  internal-set-lisp-face-attribute(default :family "adobe-courier"
#<frame emacs@momo 0x8470e48\ >)
  set-face-attribute(default #<frame emacs@momo 0x8470e48\ > :family
"adobe-courier")
  face-spec-set(default ((t (:stipple nil :background "#4D5259"
:foreground "#BFC7D9" :inverse-video nil :box nil :strike-through nil
:overline nil :underline nil :slant normal :weight normal :height 110
:width normal :family "adobe-courier"))) #<frame emacs@momo 0x8470e48\
>)
  face-set-after-frame-default(#<frame emacs@momo 0x8470e48\ >)
  internal-set-lisp-face-attribute(default :family "adobe-courier"
#<frame emacs@momo 0x8470e48\ >)
  set-face-attribute(default #<frame emacs@momo 0x8470e48\ > :family
"adobe-courier")
  face-spec-set(default ((t (:stipple nil :background "#4D5259"
:foreground "#BFC7D9" :inverse-video nil :box nil :strike-through nil
:overline nil :underline nil :slant normal :weight normal :height 110
:width normal :family "adobe-courier"))) #<frame emacs@momo 0x8470e48\
>)
  face-set-after-frame-default(#<frame emacs@momo 0x8470e48\ >)
  internal-set-lisp-face-attribute(default :family "adobe-courier"
#<frame emacs@momo 0x8470e48\ >)
  set-face-attribute(default #<frame emacs@momo 0x8470e48\ > :family
"adobe-courier")
  face-spec-set(default ((t (:stipple nil :background "#4D5259"
:foreground "#BFC7D9" :inverse-video nil :box nil :strike-through nil
:overline nil :underline nil :slant normal :weight normal :height 110
:width normal :family "adobe-courier"))) #<frame emacs@momo 0x8470e48\
>)
  face-set-after-frame-default(#<frame emacs@momo 0x8470e48\ >)
  internal-set-lisp-face-attribute(default :family "jmk-neep" 0)
  set-face-attribute(default nil :family "jmk-neep")
  face-spec-set(default ((t (:stipple nil :background "#4D5259"
:foreground "#BFC7D9" :inverse-video nil :box nil :strike-through nil
:overline nil :underline nil :slant normal :weight normal :height 140
:width normal :family "jmk-neep"))))
  custom-face-set((custom-face :documentation-shown t :custom-state
modified :tag "Default" :value default :sample-overlay #<overlay from
447 to 454 in *Customize Face: Default*> :custom-magic (custom-magic
:args (nil) :parent #0 :indent 0 :children (...) :from #<marker
(before-insertion) at 475 in *Customize Face: Default*> :to #<marker at
551 in *Customize Face: Default*> :buttons nil :value nil) :buttons
((custom-group-link :args nil :value basic-faces :tag "Basic Faces"
:parent #0 :indent 0 :button-overlay #<overlay from 586 to 597 in
*Customize Face: Default*> :from #<marker (before-insertion) at 586 in
*Customize Face: Default*> :to #<marker at 597 in *Customize Face:
Default*>) (documentation-string :args nil :value "Basic default face."
:indent 0 :parent #0 :doc-overlay #<overlay from 551 to 570 in
*Customize Face: Default*> :buttons nil :from #<marker
(before-insertion) at 551 in *Customize Face: Default*> :to #<marker at
571 in *Customize Face: Default*>) (custom-magic :args ... :parent #0
:indent 0 :children ... :from #<marker (before-insertion) at 475 in
*Customize Face: Default*> :to #<marker at 551 in *Customize Face:
Default*> :buttons nil :value nil) (visibility :args nil :value t
:help-echo "Hide or show this face." :action custom-toggle-parent
:parent #0 :indent 0 :button-overlay #<overlay from 470 to 474 in
*Customize Face: Default*> :from #<marker (before-insertion) at 470 in
*Customize Face: Default*> :to #<marker at 474 in *Customize Face:
Default*>) (item :format "(%{%t%})" :sample-face default :tag "sample"
:parent #0 :indent 0 :sample-overlay #<overlay from 462 to 468 in
*Customize Face: Default*> :from #<marker (before-insertion) at 461 in
*Customize Face: Default*> :to #<marker at 469 in *Customize Face:
Default*>)) :comment-widget (custom-comment :parent #0 :value "" :indent
0 :from #<marker at 571 in *Customize Face: Default*> :to #<marker at
571 in *Customize Face: Default*>) :custom-form selected :children
((custom-face-selected :args ... :value ... :parent #0 :indent 0
:children ... :from #<marker (before-insertion) at 598 in *Customize
Face: Default*> :to #<marker at 1281 in *Customize Face: Default*>)
(custom-comment :parent #0 :value "" :indent 0 :from #<marker at 571 in
*Customize Face: Default*> :to #<marker at 571 in *Customize Face:
Default*>)) :from #<marker (before-insertion) at 447 in *Customize Face:
Default*> :to #<marker at 1281 in *Customize Face: Default*>
:comment-shown nil))
  custom-face-action((custom-face :documentation-shown t :custom-state
modified :tag "Default" :value default :sample-overlay #<overlay from
447 to 454 in *Customize Face: Default*> :custom-magic (custom-magic
:args (nil) :parent #0 :indent 0 :children (...) :from #<marker
(before-insertion) at 475 in *Customize Face: Default*> :to #<marker at
551 in *Customize Face: Default*> :buttons nil :value nil) :buttons
((custom-group-link :args nil :value basic-faces :tag "Basic Faces"
:parent #0 :indent 0 :button-overlay #<overlay from 586 to 597 in
*Customize Face: Default*> :from #<marker (before-insertion) at 586 in
*Customize Face: Default*> :to #<marker at 597 in *Customize Face:
Default*>) (documentation-string :args nil :value "Basic default face."
:indent 0 :parent #0 :doc-overlay #<overlay from 551 to 570 in
*Customize Face: Default*> :buttons nil :from #<marker
(before-insertion) at 551 in *Customize Face: Default*> :to #<marker at
571 in *Customize Face: Default*>) (custom-magic :args ... :parent #0
:indent 0 :children ... :from #<marker (before-insertion) at 475 in
*Customize Face: Default*> :to #<marker at 551 in *Customize Face:
Default*> :buttons nil :value nil) (visibility :args nil :value t
:help-echo "Hide or show this face." :action custom-toggle-parent
:parent #0 :indent 0 :button-overlay #<overlay from 470 to 474 in
*Customize Face: Default*> :from #<marker (before-insertion) at 470 in
*Customize Face: Default*> :to #<marker at 474 in *Customize Face:
Default*>) (item :format "(%{%t%})" :sample-face default :tag "sample"
:parent #0 :indent 0 :sample-overlay #<overlay from 462 to 468 in
*Customize Face: Default*> :from #<marker (before-insertion) at 461 in
*Customize Face: Default*> :to #<marker at 469 in *Customize Face:
Default*>)) :comment-widget (custom-comment :parent #0 :value "" :indent
0 :from #<marker at 571 in *Customize Face: Default*> :to #<marker at
571 in *Customize Face: Default*>) :custom-form selected :children
((custom-face-selected :args ... :value ... :parent #0 :indent 0
:children ... :from #<marker (before-insertion) at 598 in *Customize
Face: Default*> :to #<marker at 1281 in *Customize Face: Default*>)
(custom-comment :parent #0 :value "" :indent 0 :from #<marker at 571 in
*Customize Face: Default*> :to #<marker at 571 in *Customize Face:
Default*>)) :from #<marker (before-insertion) at 447 in *Customize Face:
Default*> :to #<marker at 1281 in *Customize Face: Default*>
:comment-shown nil) (mouse-1 (#<window 3 on *Customize Face: Default*>
479 (51 . 212) 5556895)))
  widget-apply((custom-face :documentation-shown t :custom-state
modified :tag "Default" :value default :sample-overlay #<overlay from
447 to 454 in *Customize Face: Default*> :custom-magic (custom-magic
:args (nil) :parent #0 :indent 0 :children (...) :from #<marker
(before-insertion) at 475 in *Customize Face: Default*> :to #<marker at
551 in *Customize Face: Default*> :buttons nil :value nil) :buttons
((custom-group-link :args nil :value basic-faces :tag "Basic Faces"
:parent #0 :indent 0 :button-overlay #<overlay from 586 to 597 in
*Customize Face: Default*> :from #<marker (before-insertion) at 586 in
*Customize Face: Default*> :to #<marker at 597 in *Customize Face:
Default*>) (documentation-string :args nil :value "Basic default face."
:indent 0 :parent #0 :doc-overlay #<overlay from 551 to 570 in
*Customize Face: Default*> :buttons nil :from #<marker
(before-insertion) at 551 in *Customize Face: Default*> :to #<marker at
571 in *Customize Face: Default*>) (custom-magic :args ... :parent #0
:indent 0 :children ... :from #<marker (before-insertion) at 475 in
*Customize Face: Default*> :to #<marker at 551 in *Customize Face:
Default*> :buttons nil :value nil) (visibility :args nil :value t
:help-echo "Hide or show this face." :action custom-toggle-parent
:parent #0 :indent 0 :button-overlay #<overlay from 470 to 474 in
*Customize Face: Default*> :from #<marker (before-insertion) at 470 in
*Customize Face: Default*> :to #<marker at 474 in *Customize Face:
Default*>) (item :format "(%{%t%})" :sample-face default :tag "sample"
:parent #0 :indent 0 :sample-overlay #<overlay from 462 to 468 in
*Customize Face: Default*> :from #<marker (before-insertion) at 461 in
*Customize Face: Default*> :to #<marker at 469 in *Customize Face:
Default*>)) :comment-widget (custom-comment :parent #0 :value "" :indent
0 :from #<marker at 571 in *Customize Face: Default*> :to #<marker at
571 in *Customize Face: Default*>) :custom-form selected :children
((custom-face-selected :args ... :value ... :parent #0 :indent 0
:children ... :from #<marker (before-insertion) at 598 in *Customize
Face: Default*> :to #<marker at 1281 in *Customize Face: Default*>)
(custom-comment :parent #0 :value "" :indent 0 :from #<marker at 571 in
*Customize Face: Default*> :to #<marker at 571 in *Customize Face:
Default*>)) :from #<marker (before-insertion) at 447 in *Customize Face:
Default*> :to #<marker at 1281 in *Customize Face: Default*>
:comment-shown nil) :action (mouse-1 (#<window 3 on *Customize Face:
Default*> 479 (51 . 212) 5556895)))
  widget-parent-action((custom-magic :args (nil) :parent (custom-face
:documentation-shown t :custom-state modified :tag "Default" :value
default :sample-overlay #<overlay from 447 to 454 in *Customize Face:
Default*> :custom-magic #0 :buttons (... ... #0 ... ...) :comment-widget
(custom-comment :parent #1 :value "" :indent 0 :from #<marker at 571 in
*Customize Face: Default*> :to #<marker at 571 in *Customize Face:
Default*>) :custom-form selected :children (... ...) :from #<marker
(before-insertion) at 447 in *Customize Face: Default*> :to #<marker at
1281 in *Customize Face: Default*> :comment-shown nil) :indent 0
:children ((choice-item :help-echo "Change the state of this item."
:format "%[%t%]" :button-prefix widget-push-button-prefix :button-suffix
widget-push-button-suffix :mouse-down-action
widget-magic-mouse-down-action :tag "State" :parent #0 :indent 0
:button-overlay #<overlay from 478 to 483 in *Customize Face: Default*>
:from #<marker (before-insertion) at 478 in *Customize Face: Default*>
:to #<marker at 483 in *Customize Face: Default*>)) :from #<marker
(before-insertion) at 475 in *Customize Face: Default*> :to #<marker at
551 in *Customize Face: Default*> :buttons nil :value nil) (mouse-1
(#<window 3 on *Customize Face: Default*> 479 (51 . 212) 5556895)))
  widget-apply((custom-magic :args (nil) :parent (custom-face
:documentation-shown t :custom-state modified :tag "Default" :value
default :sample-overlay #<overlay from 447 to 454 in *Customize Face:
Default*> :custom-magic #0 :buttons (... ... #0 ... ...) :comment-widget
(custom-comment :parent #1 :value "" :indent 0 :from #<marker at 571 in
*Customize Face: Default*> :to #<marker at 571 in *Customize Face:
Default*>) :custom-form selected :children (... ...) :from #<marker
(before-insertion) at 447 in *Customize Face: Default*> :to #<marker at
1281 in *Customize Face: Default*> :comment-shown nil) :indent 0
:children ((choice-item :help-echo "Change the state of this item."
:format "%[%t%]" :button-prefix widget-push-button-prefix :button-suffix
widget-push-button-suffix :mouse-down-action
widget-magic-mouse-down-action :tag "State" :parent #0 :indent 0
:button-overlay #<overlay from 478 to 483 in *Customize Face: Default*>
:from #<marker (before-insertion) at 478 in *Customize Face: Default*>
:to #<marker at 483 in *Customize Face: Default*>)) :from #<marker
(before-insertion) at 475 in *Customize Face: Default*> :to #<marker at
551 in *Customize Face: Default*> :buttons nil :value nil) :action
(mouse-1 (#<window 3 on *Customize Face: Default*> 479 (51 . 212)
5556895)))
  widget-parent-action((choice-item :help-echo "Change the state of this
item." :format "%[%t%]" :button-prefix widget-push-button-prefix
:button-suffix widget-push-button-suffix :mouse-down-action
widget-magic-mouse-down-action :tag "State" :parent (custom-magic :args
(nil) :parent (custom-face :documentation-shown t :custom-state modified
:tag "Default" :value default :sample-overlay #<overlay from 447 to 454
in *Customize Face: Default*> :custom-magic #1 :buttons ...
:comment-widget ... :custom-form selected :children ... :from #<marker
(before-insertion) at 447 in *Customize Face: Default*> :to #<marker at
1281 in *Customize Face: Default*> :comment-shown nil) :indent 0
:children (#0) :from #<marker (before-insertion) at 475 in *Customize
Face: Default*> :to #<marker at 551 in *Customize Face: Default*>
:buttons nil :value nil) :indent 0 :button-overlay #<overlay from 478 to
483 in *Customize Face: Default*> :from #<marker (before-insertion) at
478 in *Customize Face: Default*> :to #<marker at 483 in *Customize
Face: Default*>) (mouse-1 (#<window 3 on *Customize Face: Default*> 479
(51 . 212) 5556895)))
  widget-apply((choice-item :help-echo "Change the state of this item."
:format "%[%t%]" :button-prefix widget-push-button-prefix :button-suffix
widget-push-button-suffix :mouse-down-action
widget-magic-mouse-down-action :tag "State" :parent (custom-magic :args
(nil) :parent (custom-face :documentation-shown t :custom-state modified
:tag "Default" :value default :sample-overlay #<overlay from 447 to 454
in *Customize Face: Default*> :custom-magic #1 :buttons ...
:comment-widget ... :custom-form selected :children ... :from #<marker
(before-insertion) at 447 in *Customize Face: Default*> :to #<marker at
1281 in *Customize Face: Default*> :comment-shown nil) :indent 0
:children (#0) :from #<marker (before-insertion) at 475 in *Customize
Face: Default*> :to #<marker at 551 in *Customize Face: Default*>
:buttons nil :value nil) :indent 0 :button-overlay #<overlay from 478 to
483 in *Customize Face: Default*> :from #<marker (before-insertion) at
478 in *Customize Face: Default*> :to #<marker at 483 in *Customize
Face: Default*>) :action (mouse-1 (#<window 3 on *Customize Face:
Default*> 479 (51 . 212) 5556895)))
  widget-apply-action((choice-item :help-echo "Change the state of this
item." :format "%[%t%]" :button-prefix widget-push-button-prefix
:button-suffix widget-push-button-suffix :mouse-down-action
widget-magic-mouse-down-action :tag "State" :parent (custom-magic :args
(nil) :parent (custom-face :documentation-shown t :custom-state modified
:tag "Default" :value default :sample-overlay #<overlay from 447 to 454
in *Customize Face: Default*> :custom-magic #1 :buttons ...
:comment-widget ... :custom-form selected :children ... :from #<marker
(before-insertion) at 447 in *Customize Face: Default*> :to #<marker at
1281 in *Customize Face: Default*> :comment-shown nil) :indent 0
:children (#0) :from #<marker (before-insertion) at 475 in *Customize
Face: Default*> :to #<marker at 551 in *Customize Face: Default*>
:buttons nil :value nil) :indent 0 :button-overlay #<overlay from 478 to
483 in *Customize Face: Default*> :from #<marker (before-insertion) at
478 in *Customize Face: Default*> :to #<marker at 483 in *Customize
Face: Default*>) (mouse-1 (#<window 3 on *Customize Face: Default*> 479
(51 . 212) 5556895)))
  widget-button-click((mouse-1 (#<window 3 on *Customize Face: Default*>
479 (51 . 212) 5556895)))
  Custom-move-and-invoke((mouse-1 (#<window 3 on *Customize Face:
Default*> 479 (51 . 212) 5556895)))
  call-interactively(Custom-move-and-invoke)

Recent input:
<tab> <return> <help-echo> <help-echo> <escape> x c 
u s <tab> - f a c <tab> <return> d e f a u l t <return> 
<help-echo> <help-echo> <down-mouse-1> <mouse-1> <backspace> 
<backspace> <backspace> <backspace> <backspace> <backspace> 
<backspace> <backspace> <backspace> <backspace> <backspace> 
<backspace> <backspace> j n <backspace> m k - n e e 
p <down-mouse-1> <mouse-1> <backspace> <backspace> 
4 0 <help-echo> <help-echo> <help-echo> <down-mouse-1> 
<mouse-1> <escape> x e m a c <tab> r e <tab> <backspace> 
<backspace> s e <tab> <backspace> <backspace> b u <tab> 
<backspace> <backspace> <backspace> <backspace> <backspace> 
<backspace> <backspace> <backspace> r e <tab> p o <tab> 
r t <tab> <return>

Recent messages:
Creating customization items ...done
Creating customization setup...
Creating customization buffer...done
Loading debug...done
Entering debugger...
 [2 times]
Making completion list...
Loading view...done
Making completion list...
Loading emacsbug...done