.emacs-my
changeset 1090 1ceec47cf341
parent 1086 0b04ee3558d8
parent 1089 7d9bd1fe3cb0
child 1093 d79cf68c97e2
equal deleted inserted replaced
1088:38a5f20eabee 1090:1ceec47cf341
   308   ;; (set-face-font 'default "7x14")
   308   ;; (set-face-font 'default "7x14")
   309   )
   309   )
   310 
   310 
   311 ;; See what I am typing immediately (for keystroke in minibuffer).
   311 ;; See what I am typing immediately (for keystroke in minibuffer).
   312 (setq echo-keystrokes 0.2)
   312 (setq echo-keystrokes 0.2)
       
   313 
       
   314 (when (eq window-system 'x)
       
   315   (set-frame-font "-misc-fixed-medium-r-normal--14-*-*-*-c-*-iso10646-1")
       
   316   (set-fontset-font "fontset-default" 'latin
       
   317                     "-misc-fixed-medium-r-normal--14-*-*-*-c-*-iso10646-1")
       
   318   (set-fontset-font "fontset-default" 'phonetic
       
   319                     "-misc-fixed-medium-r-normal--14-*-*-*-c-*-iso10646-1")
       
   320   (set-fontset-font "fontset-default" 'cyrillic
       
   321                     "-misc-fixed-medium-r-normal--14-*-*-*-c-*-iso10646-1")
       
   322   (set-fontset-font "fontset-default" 'greek
       
   323                     "-misc-fixed-medium-r-normal--14-*-*-*-c-*-iso10646-1"))
   313 
   324 
   314 (fset 'yes-or-no-p 'y-or-n-p)
   325 (fset 'yes-or-no-p 'y-or-n-p)
   315 
   326 
   316 (when (boundp 'confirm-kill-emacs)
   327 (when (boundp 'confirm-kill-emacs)
   317   (setq confirm-kill-emacs 'y-or-n-p))
   328   (setq confirm-kill-emacs 'y-or-n-p))