Broken font handling

[Carl D. Sorensen]

There is a problem with the font handling in the current git.

The following file:

\include "predefined-guitar-fretboards.ly"

\new FretBoards {
  \chordmode {d}
  \override FretBoard #'(fret-diagram-details orientation) = #'landscape
  \chordmode {d}
}

fails with this message:

Layout output to 
`test-capo-fretboards.ps'.../Users/Carl/lilypond-working/out/share/lilypond/
current/scm/framework-ps.scm:365:36: In procedure list-ref in expression
(list-ref psname-filename-fontindex 1):
/Users/Carl/lilypond-working/out/share/lilypond/current/scm/framework-ps.scm
:365:36: Wrong type argument in position 1: ("BitstreamVeraSans-Roman" .
"/usr/X11R6/lib/X11/fonts/TTF/Vera.ttf")

Thanks,

Carl