Font Selection 14/24 dots for Emacs-20

; ------------------------------------------------
; この情報は次のメールを参考に作った。
; Subject: Re: RE: Input method
; From: SAKAI Kiyotaka 
; To: mule-jp@etl.go.jp
; Date: Mon, 22 Sep 1997 18:44:09 +0900
; X-Seqno: 6633
;
;  ~/.Xdefaults の中に
; -----------------------
; Emacs*Fontset-0:    -*-fixed-medium-r-normal--14-*-*-*-*-*-fontset-small
; Emacs.Fontset-1: -sony-fixed-medium-r-normal--24-*-*-*-*-*-fontset-big
; -----------------------
;  という設定をして、
;
;   v ここを t にすれば 14 dot font (small)に
(if nil 
  (setq default-frame-alist
        (append
         '((line-space . "0") (width . 80) (height . 50)
           (font . "fontset-small"))
         default-frame-alist)))
;   v こちらを t にすれば 24 dot font (big) に、
(if t
  (setq default-frame-alist
        (append
         '((line-space . "0") (width . 80) (height . 18)
           (font . "fontset-big"))
         default-frame-alist)))
;また 画面の中で Shift Mouse-1 とすると、
; ------------
;   Font Menu
;     Misc
;     Courier
;     Fontset
; ------------
;   と出て来るので、Fontset の中で、次のものを選ぶことも出来る。
;       standard: 16-dot medium
;          small: 16-dot medium
;            big: 24-dot medium