# HG changeset patch # User Oleksandr Gavenko # Date 1474838973 -10800 # Node ID bbc10fe15aa5f56a15b95587847a7f0128d30f19 # Parent 55307015efd04b317fdd128490817756a7632d3d Decide to use "DejaVu Sans Mono-11" as default font. It has same width as Terminus but has larger height and better readable especially from large distance. diff -r 55307015efd0 -r bbc10fe15aa5 .emacs-my --- a/.emacs-my Sun Sep 25 22:56:05 2016 +0300 +++ b/.emacs-my Mon Sep 26 00:29:33 2016 +0300 @@ -415,15 +415,8 @@ (cond ((eq window-system 'x) - (set-frame-font "-*-terminus-*-*-*--14-*-*-*-c-*-*-*") - (setq-default line-spacing nil) - (set-fontset-font nil 'cyrillic "-*-terminus-*-*-*--14-*-*-*-c-*-*-*") - (set-fontset-font nil 'greek "-*-terminus-*-*-*--14-*-*-*-c-*-*-*") - (set-fontset-font nil nil "-misc-fixed-*-*-*--13-*-*-*-*-*-*-*") - (set-fontset-font nil 'phonetic "-misc-fixed-*-*-*--13-*-*-*-*-*-*-*") - (set-fontset-font nil 'symbol "-misc-fixed-*-*-*--13-*-*-*-*-*-*-*") - ;; MODIFIER LETTER is not present in terminus, this includes ˌːˈ characters. - (set-fontset-font nil '(#x02C0 . #x02FF) "-misc-fixed-*-*-*--13-*-*-*-*-*-*-*") ) + (when (find-font (font-spec :name "DejaVu Sans Mono-11:weight=normal")) + (set-frame-font "DejaVu Sans Mono-11"))) ((eq window-system 'w32) (set-frame-font "Courier New-10:antialias=none") )) diff -r 55307015efd0 -r bbc10fe15aa5 .emacs-obsolete --- a/.emacs-obsolete Sun Sep 25 22:56:05 2016 +0300 +++ b/.emacs-obsolete Mon Sep 26 00:29:33 2016 +0300 @@ -323,3 +323,21 @@ (set-fontset-font "fontset-default" 'phonetic my-preferred-font) (set-fontset-font "fontset-default" 'cyrillic my-preferred-font) (set-fontset-font "fontset-default" 'greek my-preferred-font)) + +;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; +(message "font selection") + +(cond + ((eq window-system 'x) + (set-frame-font "-*-terminus-*-*-*--14-*-*-*-c-*-*-*") + (setq-default line-spacing nil) + (set-fontset-font nil 'cyrillic "-*-terminus-*-*-*--14-*-*-*-c-*-*-*") + (set-fontset-font nil 'greek "-*-terminus-*-*-*--14-*-*-*-c-*-*-*") + (set-fontset-font nil nil "-misc-fixed-*-*-*--13-*-*-*-*-*-*-*") + (set-fontset-font nil 'phonetic "-misc-fixed-*-*-*--13-*-*-*-*-*-*-*") + (set-fontset-font nil 'symbol "-misc-fixed-*-*-*--13-*-*-*-*-*-*-*") + ;; MODIFIER LETTER is not present in terminus, this includes ˌːˈ characters. + (set-fontset-font nil '(#x02C0 . #x02FF) "-misc-fixed-*-*-*--13-*-*-*-*-*-*-*") ) + ((eq window-system 'w32) + (set-frame-font "Courier New-10:antialias=none") )) +