RE: Split `simple.el'?

[Drew Adams]

> >   M-: (length (x-list-fonts "*")) RET
> 
> Actually, this might be more fair:
> 
>   M-: (length (x-list-fonts "-*-*-normal-*-*-*-13-*-*-*-*-*-iso10646-1"))
> RET
> 
> where the "13" part could need a change, if (face-font 'default)
> reports a different pixel-width of the default font on your system.

That gives 3506, for me (substituting 14 for 13).  But only
when done in a frame where (face-font 'default) = 14.

I zoom frames all the time, by changing the font size
(changing 14 to 5, for a thumbnail frame, or incrementally
incrementing or decrementing the current font size.

IOW, `(face-font 'default)' changes, for me, depending on
the current degree of zooming.