Re: font question

[Chip Coldwell]

On Mon, 23 Jun 2008, Chip Coldwell wrote:

> I have this in my .emacs
> 
> (custom-set-faces
>   ;; custom-set-faces was added by Custom.
>   ;; If you edit it by hand, you could mess it up, so be careful.
>   ;; Your init file should contain only one such instance.
>   ;; If there is more than one, they won't work right.
>  '(default ((t (:family "DejaVu Sans Mono" :height 100))))
>  '(variable-pitch ((t (:family "Liberation Sans" :height 100)))))
> 
> and it seems to do what I want (although the font I see on screen
> looks a lot bigger to my eye than 10pt that is implied by the
> :height).

I wonder if there isn't a missing XINT somewhere.  Here's my default
face:

Face: default (sample) (customize this face)
Documentation: Basic default face.
Defined in `faces.el'.

        Family: DejaVu Sans Mono
       Foundry: unknown
         Width: normal
        Height: 96
        Weight: normal
         Slant: normal
    Foreground: #000000
    Background: #ffffff
     Underline: nil
      Overline: nil
Strike-through: nil
           Box: nil
       Inverse: nil
       Stipple: nil
          Font: #<font-object -unknown-DejaVu Sans 
Mono-normal-normal-normal-*-12-*-*-*-m-0-iso8859-1>
       Fontset: -unknown-DejaVu Sans 
Mono-normal-normal-normal-*-12-*-*-*-m-0-fontset-auto2
       Inherit: unspecified

Note that "Height: 96" but the XLFD, contains "-12-" in the pxlsz
field.  Note that

#define XINT(a) (((EMACS_INT) (a)) >> GCTYPEBITS)

and

#define GCTYPEBITS 3

on my platform, thus

XINT(96) == 96 >> 3 == 96/8 == 12

Is the :height key in a font-spec supposed to be a Lisp integer?
Seems like an ugly thing to put the user through.

I will continue to debug this.

Chip

-- 
Charles M. "Chip" Coldwell
Senior Software Engineer
Red Hat, Inc
978-392-2426

GPG ID:  852E052F
GPG FPR: 77E5 2B51 4907 F08A 7E92  DE80 AFA9 9A8F 852E 052F