bug#709: font selection problem

[Chong Yidong <cyd@stupidchicken.com>]

[Recording a message from Werner LEMBERG]:

-----

[I started emacs with

   gdb --args emacs -Q

 in the emacs src dir, using CVS from Oct. 14th, 22:44 MEST]

 First, move point over any non-space character, and do `C-u C-x ='.
 This should report the default font, among other information.  What is
 this font?

Using a character from the message in the `*scratch*' buffer, it
reports

          character: u (117, #o165, #x75)
  preferred charset: ascii (ASCII (ISO646 IRV))
         code point: 0x75
             syntax: w 	which means: word
           category: a:ASCII graphic characters 32-126 (ISO646 IRV:1983[4/0])
		     l:Latin r:Japanese roman
        buffer code: #x75
          file code: #x75 (encoded by coding system utf-8-unix)
            display: by this font (glyph code)
      x:-shinonome-gothic-medium-r-normal--16-150-75-75-c-80-iso8859-1 (#x75)

  Character code properties: customize what to show
    name: LATIN SMALL LETTER U
    general-category: Ll (Letter, Lowercase)

  There are text properties here:
    face                 font-lock-comment-face
    fontified            t

 Next, do

   M-: (x-select-font) RET

 What is the default font shown in the dialog?

Sans - Standard - 12

 Try setting a breakpoint in Fx_select_font, and call

   M-: (x-select-font) RET

 again.  [...]

 Is default_font defined?

Yes.  `pr default_font' gives

  #<font-object "-shinonome-gothic-medium-r-normal--16-150-75-75-c-80-iso8859-1">

 If so, step past the call to font_unparse_gtkname.  What is the
 string stored in default_name?

"gothic Medium R 15".