Re: quick change of face-size?

[Peter Dyballa]

Am 06.11.2005 um 22:26 schrieb knubee:

> When using an overhead projector to show some file in emacs, it would
> be nice if there was a way to quickly change the face-size displayed.

You can edit setq x-fixed-font-alist in some site init file à la:

   '("X11 Font Menu"
      ("Misc fixed"
;; For these, we specify the pixel height and width.
       ("«ProFont»" "»ProFont«")
       ("ISO 10646-1" 
"-misc-profontwindows-medium-r-normal--0-*-*-*-m-*-iso10646-1" "ISO 
10646-1")
       ("ISO 8859-15" 
"-misc-profontwindows-medium-r-normal--0-*-*-*-m-*-iso8859-15" "ISO 
8859-15")
       ("fcd 8859-15" 
"-misc-profontwindows-medium-r-normal--0-*-*-*-m-*-fcd8859-15" "fcd 
8859-15")
       ("ISO 8859-9"  
"-misc-profontwindows-medium-r-normal--0-*-*-*-m-*-iso8859-9"  "ISO 
8859-9")
       ("ISO 8859-1"  
"-misc-profontwindows-medium-r-normal--0-*-*-*-m-*-iso8859-1"  "ISO 
8859-1")
       ("ASCII-0"     
"-misc-profontwindows-medium-r-normal--0-*-*-*-m-*-ascii-0"    
"ASCII-0")
       ("fixed" "fixed")
       (  "4x6" "-misc-fixed-medium-r-normal--6-*-*-*-c-40-iso10646-1"  
   "4x6")
       (  "5x7" "-misc-fixed-medium-r-normal--7-*-*-*-c-50-iso10646-1"  
   "5x7")
       (  "5x8" "-misc-fixed-medium-r-normal--8-*-*-*-c-50-iso10646-1"  
   "5x8")
       (  "6x9" "-misc-fixed-medium-r-normal--9-*-*-*-c-60-iso10646-1"  
   "6x9")
       ( "6x10" "-misc-fixed-medium-r-normal--10-*-*-*-c-60-iso10646-1" 
  "6x10")
       ( "6x12" 
"-misc-fixed-medium-r-semicondensed--12-*-*-*-c-60-iso10646-1" "6x12")
       ( "6x13" 
"-misc-fixed-medium-r-semicondensed--13-*-*-*-c-60-iso10646-1" "6x13")
       ( "7x13" "-misc-fixed-medium-r-normal--13-*-*-*-c-70-iso10646-1" 
  "7x13")
       ( "7x14" "-misc-fixed-medium-r-normal--14-*-*-*-c-70-iso10646-1" 
  "7x14")
       ( "8x13" "-misc-fixed-medium-r-normal--13-*-*-*-c-80-iso10646-1" 
  "8x13")
       ( "9x15" "-misc-fixed-medium-r-normal--15-*-*-*-c-90-iso10646-1" 
  "9x15")
       ("10x20" 
"-misc-fixed-medium-r-normal--20-*-*-*-c-100-iso10646-1" "10x20")
       ("11x18" 
"-misc-fixed-medium-r-normal--18-*-*-*-c-110-iso10646-1" "11x18")
       ("12x24" 
"-misc-fixed-medium-r-normal--24-*-*-*-c-120-iso10646-1" "12x24")
       )
      ("Lucida Sans Typewriter 75 DPI"
;; For these, we specify the point height and the DPIs.
       ( "8" 	      
	"-*-lucidatypewriter-medium-r-normal-*-80-75-75-m-*-iso10646-1")
       ("10" 	      
	"-*-lucidatypewriter-medium-r-normal-*-100-75-75-m-*-iso10646-1")
       ("12" 	      
	"-*-lucidatypewriter-medium-r-normal-*-120-75-75-m-*-iso10646-1")
       ("14" 	      
	"-*-lucidatypewriter-medium-r-normal-*-140-75-75-m-*-iso10646-1")
       ("18" 	      
	"-*-lucidatypewriter-medium-r-normal-*-180-75-75-m-*-iso10646-1")
       ("19" 	      
	"-*-lucidatypewriter-medium-r-normal-*-190-75-75-m-*-iso10646-1")
       ("24" 	      
	"-*-lucidatypewriter-medium-r-normal-*-240-75-75-m-*-iso10646-1")
       ( "8 bold"       
"-*-lucidatypewriter-bold-r-normal-*-80-75-75-m-*-iso10646-1")
       ("10 bold"       
"-*-lucidatypewriter-bold-r-normal-*-100-75-75-m-*-iso10646-1")
       ("12 bold"       
"-*-lucidatypewriter-bold-r-normal-*-120-75-75-m-*-iso10646-1")
       ("14 bold"       
"-*-lucidatypewriter-bold-r-normal-*-140-75-75-m-*-iso10646-1")
       ("18 bold"       
"-*-lucidatypewriter-bold-r-normal-*-180-75-75-m-*-iso10646-1")
       ("19 bold"       
"-*-lucidatypewriter-bold-r-normal-*-190-75-75-m-*-iso10646-1")
       ("24 bold"       
"-*-lucidatypewriter-bold-r-normal-*-240-75-75-m-*-iso10646-1")
       ( "8 slant"      
"-*-lucidatypewriter-medium-o-normal-*-80-75-75-m-*-iso10646-1")
       ("10 slant"      
"-*-lucidatypewriter-medium-o-normal-*-100-75-75-m-*-iso10646-1")
       ("12 slant"      
"-*-lucidatypewriter-medium-o-normal-*-120-75-75-m-*-iso10646-1")
       ("14 slant"      
"-*-lucidatypewriter-medium-o-normal-*-140-75-75-m-*-iso10646-1")
       ("18 slant"      
"-*-lucidatypewriter-medium-o-normal-*-180-75-75-m-*-iso10646-1")
       ("19 slant"      
"-*-lucidatypewriter-medium-o-normal-*-190-75-75-m-*-iso10646-1")
       ("24 slant"      
"-*-lucidatypewriter-medium-o-normal-*-240-75-75-m-*-iso10646-1")
       ( "8 bold slant" 
"-*-lucidatypewriter-bold-o-normal-*-80-75-75-m-*-iso10646-1")
       ("10 bold slant" 
"-*-lucidatypewriter-bold-o-normal-*-100-75-75-m-*-iso10646-1")
       ("12 bold slant" 
"-*-lucidatypewriter-bold-o-normal-*-120-75-75-m-*-iso10646-1")
       ("14 bold slant" 
"-*-lucidatypewriter-bold-o-normal-*-140-75-75-m-*-iso10646-1")
       ("18 bold slant" 
"-*-lucidatypewriter-bold-o-normal-*-180-75-75-m-*-iso10646-1")
       ("19 bold slant" 
"-*-lucidatypewriter-bold-o-normal-*-190-75-75-m-*-iso10646-1")
       ("24 bold slant" 
"-*-lucidatypewriter-bold-o-normal-*-240-75-75-m-*-iso10646-1")
      )
      ("Courier @ 100 DPI" ...)

and create some fontsets. Shift-mouse-1 pops up a menu to choose either 
a font or a fontset. Make the default visible there. Create a 
return-to-default-font function too and bind it to some key.

--
Greetings

  Pete

Time is an illusion. Lunchtime, doubly so.