adding fonts to font menu?

adding fonts to font menu?

[Peter Lampione]

I have figured out the answer to my previous question (I needed 
to turn the 0's into *, &^%#&%$#!!). 

Once one finds nice fonts, how does one add them to the menu that 
pops up when pressing shift-leftbutton? 

Thanks, 

Peter

Re: adding fonts to font menu?

[Jesper Harder]

plampione@yahoo.com (Peter Lampione) writes:

> Once one finds nice fonts, how does one add them to the menu that 
> pops up when pressing shift-leftbutton?

I think something like this should work:

(add-to-list 'x-fixed-font-alist 
	     '("My fonts" 
	       ("Andale Mono" 
		"-monotype-andale mono-medium-r-normal-*-24-*-*-*-m-*-iso8859-1")
	       ("Luxi Mono" 
		"-b&h-luxi mono-medium-r-normal-*-12-*-*-*-m-*-iso8859-1")) 
	     t)

Re: adding fonts to font menu?

[Peter Lampione]

Thanks!

I wasn't able to use add-to-list, so I simply setq'ed 
x-fixed-font-alist to the desired value.  Much better now!

Peter


Jesper Harder <harder@myrealbox.com> wrote in message news:<m3of779xz8.fsf@defun.localdomain>...
> plampione@yahoo.com (Peter Lampione) writes:
> 
> > Once one finds nice fonts, how does one add them to the menu that 
> > pops up when pressing shift-leftbutton?
> 
> I think something like this should work:
> 
> (add-to-list 'x-fixed-font-alist 
> 	     '("My fonts" 
> 	       ("Andale Mono" 
> 		"-monotype-andale mono-medium-r-normal-*-24-*-*-*-m-*-iso8859-1")
> 	       ("Luxi Mono" 
> 		"-b&h-luxi mono-medium-r-normal-*-12-*-*-*-m-*-iso8859-1")) 
> 	     t)