Setting default font

Setting default font

[John Smith]

I am using emacs 21 under X-Windows, and the default font for text is 
rather small. I can change this under the Options/Mule menu. I select my 
preferred font -- courier 14 -- and then try to Save these settings 
(under the same Options menu). But the save doesn't save. The next time 
I start up, I get the same microscopic font. Any suggestions? I would 
think there's some line like set-default-font-courier 14 that I can put 
in my .emacs file.

J.

Re: Setting default font

[Michael Slass]

John Smith <johns2326@hotmail.com> writes:

>I am using emacs 21 under X-Windows, and the default font for text is
>rather small. I can change this under the Options/Mule menu. I select my
>preferred font -- courier 14 -- and then try to Save these settings (under
>the same Options menu). But the save doesn't save. The next time I start
>up, I get the same microscopic font. Any suggestions? I would think there's
>some line like set-default-font-courier 14 that I can put in my .emacs file.
>
>J.
>

search google groups for this article
<m3fzuh4273.fsf@localhost.localdomain>

-- 
Mike Slass

Re: Setting default font

[Roland Roberts]

>>>>> "John" == John Smith <johns2326@hotmail.com> writes:

    John> I am using emacs 21 under X-Windows, and the default font for text is
    John> rather small.

One normally does this in .Xdefaults, like so

    Emacs*font:             -misc-fixed-medium-r-semicondensed--13-120-75-75-c-60-iso8859-1

This particular font, which my system, results in 13-dot fontset
configuration.  In addition, I have this fontset setup in my .emacs to
get 14-, 15-, and 24-dot fontsets.

       (if (eq window-system 'x)
	   (progn
	     (create-fontset-from-fontset-spec
	      "-*-fixed-medium-r-normal-*-24-*-*-*-*-*-fontset-24pt,
		chinese-gb2312:-*-medium-r-normal-*-24-*-gb2312*-*,
		korean-ksc5601:-*-medium-r-normal-*-24-*-ksc5601*-*,
		chinese-cns11643-1:-*-medium-r-normal-*-24-*-cns11643*-1,
		chinese-cns11643-2:-*-medium-r-normal-*-24-*-cns11643*-2,
		chinese-cns11643-3:-*-medium-r-normal-*-24-*-cns11643*-3,
		chinese-cns11643-4:-*-medium-r-normal-*-24-*-cns11643*-4,
		chinese-cns11643-5:-*-medium-r-normal-*-24-*-cns11643*-5,
		chinese-cns11643-6:-*-medium-r-normal-*-24-*-cns11643*-6,
		chinese-cns11643-7:-*-medium-r-normal-*-24-*-cns11643*-7" t)
	     (create-fontset-from-fontset-spec
		"-*-fixed-bold-r-normal-*-24-*-*-*-*-*-fontset-24pt,
		chinese-gb2312:-*-bold-r-normal-*-24-*-gb2312*-*,
		korean-ksc5601:-*-bold-r-normal-*-24-*-ksc5601*-*,
		chinese-cns11643-1:-*-bold-r-normal-*-24-*-cns11643*-1,
		chinese-cns11643-2:-*-bold-r-normal-*-24-*-cns11643*-2,
		chinese-cns11643-3:-*-bold-r-normal-*-24-*-cns11643*-3,
		chinese-cns11643-4:-*-bold-r-normal-*-24-*-cns11643*-4,
		chinese-cns11643-5:-*-bold-r-normal-*-24-*-cns11643*-5,
		chinese-cns11643-6:-*-bold-r-normal-*-24-*-cns11643*-6,
		chinese-cns11643-7:-*-bold-r-normal-*-24-*-cns11643*-7" t)
	     (create-fontset-from-fontset-spec
	      "-*-fixed-medium-r-normal-*-15-*-*-*-*-*-fontset-15pt,
		chinese-gb2312:-*-medium-r-normal-*-15-*-gb2312*-*,
		korean-ksc5601:-*-medium-r-normal-*-15-*-ksc5601*-*,
		chinese-cns11643-1:-*-medium-r-normal-*-15-*-cns11643*-1,
		chinese-cns11643-2:-*-medium-r-normal-*-15-*-cns11643*-2,
		chinese-cns11643-3:-*-medium-r-normal-*-15-*-cns11643*-3,
		chinese-cns11643-4:-*-medium-r-normal-*-15-*-cns11643*-4,
		chinese-cns11643-5:-*-medium-r-normal-*-15-*-cns11643*-5,
		chinese-cns11643-6:-*-medium-r-normal-*-15-*-cns11643*-6,
		chinese-cns11643-7:-*-medium-r-normal-*-15-*-cns11643*-7" t)
	     (create-fontset-from-fontset-spec
		"-*-fixed-bold-r-normal-*-15-*-*-*-*-*-fontset-15pt,
		chinese-gb2312:-*-bold-r-normal-*-15-*-gb2312*-*,
		korean-ksc5601:-*-bold-r-normal-*-15-*-ksc5601*-*,
		chinese-cns11643-1:-*-bold-r-normal-*-15-*-cns11643*-1,
		chinese-cns11643-2:-*-bold-r-normal-*-15-*-cns11643*-2,
		chinese-cns11643-3:-*-bold-r-normal-*-15-*-cns11643*-3,
		chinese-cns11643-4:-*-bold-r-normal-*-15-*-cns11643*-4,
		chinese-cns11643-5:-*-bold-r-normal-*-15-*-cns11643*-5,
		chinese-cns11643-6:-*-bold-r-normal-*-15-*-cns11643*-6,
		chinese-cns11643-7:-*-bold-r-normal-*-15-*-cns11643*-7" t)
	     (create-fontset-from-fontset-spec
		"-*-fixed-medium-r-normal-*-14-*-*-*-*-*-fontset-14pt,
		chinese-gb2312:-*-medium-r-normal-*-14-*-gb2312*-*,
		korean-ksc5601:-*-medium-r-normal-*-14-*-ksc5601*-*,
		chinese-cns11643-1:-*-medium-r-normal-*-14-*-cns11643*-1,
		chinese-cns11643-2:-*-medium-r-normal-*-14-*-cns11643*-2,
		chinese-cns11643-3:-*-medium-r-normal-*-14-*-cns11643*-3,
		chinese-cns11643-4:-*-medium-r-normal-*-14-*-cns11643*-4,
		chinese-cns11643-5:-*-medium-r-normal-*-14-*-cns11643*-5,
		chinese-cns11643-6:-*-medium-r-normal-*-14-*-cns11643*-6,
		chinese-cns11643-7:-*-medium-r-normal-*-14-*-cns11643*-7" t)
	     (create-fontset-from-fontset-spec
		"-*-fixed-bold-r-normal-*-14-*-*-*-*-*-fontset-14pt,
		chinese-gb2312:-*-bold-r-normal-*-14-*-gb2312*-*,
		korean-ksc5601:-*-bold-r-normal-*-14-*-ksc5601*-*,
		chinese-cns11643-1:-*-bold-r-normal-*-14-*-cns11643*-1,
		chinese-cns11643-2:-*-bold-r-normal-*-14-*-cns11643*-2,
		chinese-cns11643-3:-*-bold-r-normal-*-14-*-cns11643*-3,
		chinese-cns11643-4:-*-bold-r-normal-*-14-*-cns11643*-4,
		chinese-cns11643-5:-*-bold-r-normal-*-14-*-cns11643*-5,
		chinese-cns11643-6:-*-bold-r-normal-*-14-*-cns11643*-6,
		chinese-cns11643-7:-*-bold-r-normal-*-14-*-cns11643*-7" t)
	     ))


roland
-- 
		       PGP Key ID: 66 BC 3B CD
Roland B. Roberts, PhD                             RL Enterprises
roland@rlenter.com                            6818 Madeline Court
roland@astrofoto.org                           Brooklyn, NY 11220

Setting default font

[Juha Nieminen]

   I'm using emacs 22.3.1 in a MacOS X system. Each time I start emacs I 
select from the Options menu Set Font/Fontset... > Courier > 14

   What would be the magic command to put in .emacs for this to always 
happen automatically on startup?

Re: Setting default font

[Katsumi Yamaoka]

>>>>> Juha Nieminen wrote:
>   I'm using emacs 22.3.1 in a MacOS X system. Each time I start emacs
> I select from the Options menu Set Font/Fontset... > Courier > 14

>   What would be the magic command to put in .emacs for this to always
> happen automatically on startup?

In my Linux box, this is what that mouse command exactly does:

(set-default-font (cadr (assoc "14" (assoc "Courier" x-fixed-font-alist))))

Re: Setting default font

[Peter Dyballa]

Am 19.01.2009 um 10:34 schrieb Juha Nieminen:

>   I'm using emacs 22.3.1 in a MacOS X system. Each time I start  
> emacs I select from the Options menu Set Font/Fontset... > Courier  
> > 14
>
>   What would be the magic command to put in .emacs for this to  
> always happen automatically on startup?


	(setq initial-frame-alist
	  (append (list
	    '(border-color      . "#4e3832")
	    '(foreground-color  . "grey10")
	    '(background-color  . "AliceBlue")
	    '(active-alpha      . 0.875)
	    '(inactive-alpha    . 0.75)
	    '(font . "fontset-10pt_lucidatypewriter")
	    '(top . 136) '(left . 666) '(width . 100) '(height . 57)
	  ) initial-frame-alist))

And also default-frame-alist. Another option is an X resource, as  
documented in info, which selects a fontset built by you.

--
Greetings

   Pete

Debugging? Klingons do not debug. Our software does not coddle the weak.

Re: Setting default font

[Richard Riley]

Juha Nieminen <nospam@thanks.invalid> writes:

>   I'm using emacs 22.3.1 in a MacOS X system. Each time I start emacs
> I select from the Options menu Set Font/Fontset... > Courier > 14
>
>   What would be the magic command to put in .emacs for this to always
> happen automatically on startup?

I set my font in a special .xEmacs file which I include into my
.Xresources e.g

.Xresources:

,----
| #include "./.emacs.d/.xEmacs"
`----

.xEmacs:

,----
| Emacs*font: -adobe-courier-medium-r-normal-*-12-100-*-*-m-*-iso8859-1
| Emacs.toolBar: off
| Emacs.menu: on
| Emacs.foreground: wheat
| Emacs.background: darkslategrey
| Emacs.pointerColor: Grey
| Emacs.cursorColor: LightGray
| Emacs.borderColor: black
`----


It is much faster on my system than setting with a call to
set-default-font.

-- 
 important and urgent problems of the technology of today are no longer the satisfactions of the primary needs or of archetypal wishes, but the reparation of the evils and damages by the technology of yesterday.  ~Dennis Gabor, Innovations:  Scientific, Technological and Social, 1970