color-theme-select error?

[Leon]

Hi,

M-x color-theme-select gives the following error message:

------------------------------------------------------------------------
Debugger entered--Lisp error: (wrong-type-argument symbolp (link-visited 
info-xref))
  internal-get-lisp-face-attribute((link-visited info-xref) :family #<frame  
*Minibuf-1* - address@hidden 0x8a807f8>)
  face-attribute((link-visited info-xref) :family #<frame  *Minibuf-1* - 
address@hidden 0x8a807f8>)
  color-theme-face-attr-construct((link-visited info-xref) #<frame  *Minibuf-1* 
- address@hidden 0x8a807f8>)
  color-theme-spec-resolve-inheritance((:inherit))
  color-theme-spec(info-xref-visited)
  mapcar(color-theme-spec (default blue bold bold-italic border border-glyph 
buffer-menu-buffer buffers-tab button calendar-today comint-highlight-input 
comint-highlight-prompt completions-common-part completions-first-difference 
cperl-array-face cperl-hash-face cperl-nonoverridable-face cursor custom-button 
custom-button-face custom-button-mouse custom-button-pressed 
custom-button-pressed-unraised custom-button-unraised custom-changed 
custom-changed-face custom-comment custom-comment-tag custom-documentation 
custom-documentation-face custom-face-tag custom-face-tag-face custom-group-tag 
custom-group-tag-1 custom-group-tag-face custom-group-tag-face-1 custom-invalid 
custom-invalid-face custom-link custom-modified custom-modified-face 
custom-rogue custom-rogue-face custom-saved custom-saved-face custom-set 
custom-set-face custom-state custom-state-face custom-themed ...))
  color-theme-get-face-definitions()
  color-theme-make-snapshot()
  color-theme-select(nil)
  call-interactively(color-theme-select)
  execute-extended-command(nil)
  call-interactively(execute-extended-command)
  recursive-edit()
  byte-code("Æ @Ç=ƒ!