RE: Cannot load font?

[George Roman]

On Monday, November 17, 2008 7:06 AM, Peter Dyballa wrote:
> > Emacs is silently ignoring the Dina fonts and picking something else
> > instead.  Why?
>
> Does it also happen with the *-frame-alist's? Does it happen also when
> you copy the font names from the *Completions* buffer? If so and if so
> in an Emacs launched with -Q then it's worth a bug report (from Help
> menu).

Here's the output from a *scratch* buffer in a session launched with -Q


(cdr (assoc 'font (frame-parameters)))
"-Adobe-Courier-Medium-R-Normal--12-120-75-75-M-70-ISO8859-1"


(x-list-fonts "*dina-medium-r-*-100-*")
("-windows-dina-medium-r-normal--16-100-96-96-c-80-microsoft-cp1252")


(set-default-font
 "-windows-dina-medium-r-normal--16-100-96-96-c-80-microsoft-cp1252" nil)
nil
;; My screen resets (font changes, but it's not Dina)


(cdr (assoc 'font (frame-parameters)))
"-Adobe-Courier-Medium-R-Normal--17-120-100-100-M-100-ISO8859-1"


(setq initial-frame-alist
      '(
        (mouse-color             . "midnightblue")
        (foreground-color        . "grey20")
        (background-color        . "alice blue")
        (internal-border-width   . 2)
        (line-spacing            . 1)
        (active-alpha            . 0.875)
        (inactive-alpha  . 0.75)
        (font . 
"-windows-dina-medium-r-normal--16-100-96-96-c-80-microsoft-cp1252")
        (top . 25) (left . 650) (width . 91) (height . 50)))
((mouse-color . "midnightblue") (foreground-color . "grey20") (background-color 
. "alice blue")
(internal-border-width . 2) (line-spacing . 1) (active-alpha . 0.875) 
(inactive-alpha . 0.75) (font
. "-windows-dina-medium-r-normal--16-100-96-96-c-80-microsoft-cp1252") (top . 
25) (left . 650)
(width . 91) (height . 50))


(setq default-frame-alist
      '(
        (border-color            . "#4e3831")
        (foreground-color        . "grey10")
        (background-color        . "ghost white")
        (vertical-scroll-bars    . left)
        (cursor-color            . "purple")
        (cursor-type             . box)
        (active-alpha            . 0.75)
        (inactive-alpha  . 0.875)
        (font . 
"-windows-dina-medium-r-normal--16-100-96-96-c-80-microsoft-cp1252")
        (top . 50) (left . 150) (width . 89) (height . 56)))
((border-color . "#4e3831") (foreground-color . "grey10") (background-color . 
"ghost white")
(vertical-scroll-bars . left) (cursor-color . "purple") (cursor-type . box) 
(active-alpha . 0.75)
(inactive-alpha . 0.875) (font .
"-windows-dina-medium-r-normal--16-100-96-96-c-80-microsoft-cp1252") (top . 50) 
(left . 150) (width
. 89) ...)


(cdr (assoc 'font (frame-parameters)))
"-Adobe-Courier-Medium-R-Normal--17-120-100-100-M-100-ISO8859-1"


;; Trying to open a new window via "C-x 5 b" yields a window with the
;; above Adobe font (...--17-120-100-...)


(set-default-font
 "-dec-terminal-medium-r-normal--14-140-75-75-c-80-iso8859-1" nil)
nil
;; My screen resets (new font being used)


(cdr (assoc 'font (frame-parameters)))
"-DEC-Terminal-Medium-R-Normal--14-140-75-75-C-80-ISO8859-1"


Does this provide any new insights?  If not, I'll create the bug report.