.emacs-my
changeset 1477 d634562dbf77
parent 1475 0cadf9373539
child 1478 e6f6dd580012
equal deleted inserted replaced
1476:b96d34784bf7 1477:d634562dbf77
   433  ((eq window-system 'x)
   433  ((eq window-system 'x)
   434   (if (and (fboundp 'find-font) (find-font (font-spec :name "DejaVu Sans Mono-11:weight=normal")))
   434   (if (and (fboundp 'find-font) (find-font (font-spec :name "DejaVu Sans Mono-11:weight=normal")))
   435       (set-frame-font "DejaVu Sans Mono-11")
   435       (set-frame-font "DejaVu Sans Mono-11")
   436     (set-frame-font "7x14")))
   436     (set-frame-font "7x14")))
   437  ((eq window-system 'w32)
   437  ((eq window-system 'w32)
   438   (set-frame-font "Courier New-10:antialias=none") ))
   438   (set-frame-font "Courier New-10:antialias=none")
       
   439   (set-fontset-font nil 'cyrillic "Courier New-10:antialias=none")
       
   440   (set-fontset-font nil 'greek "Courier New-10:antialias=none")
       
   441   (set-fontset-font nil 'phonetic "Courier New-10:antialias=none")
       
   442   (set-fontset-font nil 'symbol "Courier New-10:antialias=none")))
   439 
   443 
   440 (fset 'yes-or-no-p 'y-or-n-p)
   444 (fset 'yes-or-no-p 'y-or-n-p)
   441 
   445 
   442 (when (boundp 'confirm-kill-emacs)
   446 (when (boundp 'confirm-kill-emacs)
   443   (setq confirm-kill-emacs 'y-or-n-p))
   447   (setq confirm-kill-emacs 'y-or-n-p))