equal
deleted
inserted
replaced
321 (set-frame-font my-preferred-font) |
321 (set-frame-font my-preferred-font) |
322 (set-fontset-font "fontset-default" 'latin my-preferred-font) |
322 (set-fontset-font "fontset-default" 'latin my-preferred-font) |
323 (set-fontset-font "fontset-default" 'phonetic my-preferred-font) |
323 (set-fontset-font "fontset-default" 'phonetic my-preferred-font) |
324 (set-fontset-font "fontset-default" 'cyrillic my-preferred-font) |
324 (set-fontset-font "fontset-default" 'cyrillic my-preferred-font) |
325 (set-fontset-font "fontset-default" 'greek my-preferred-font)) |
325 (set-fontset-font "fontset-default" 'greek my-preferred-font)) |
|
326 |
|
327 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; |
|
328 (message "font selection") |
|
329 |
|
330 (cond |
|
331 ((eq window-system 'x) |
|
332 (set-frame-font "-*-terminus-*-*-*--14-*-*-*-c-*-*-*") |
|
333 (setq-default line-spacing nil) |
|
334 (set-fontset-font nil 'cyrillic "-*-terminus-*-*-*--14-*-*-*-c-*-*-*") |
|
335 (set-fontset-font nil 'greek "-*-terminus-*-*-*--14-*-*-*-c-*-*-*") |
|
336 (set-fontset-font nil nil "-misc-fixed-*-*-*--13-*-*-*-*-*-*-*") |
|
337 (set-fontset-font nil 'phonetic "-misc-fixed-*-*-*--13-*-*-*-*-*-*-*") |
|
338 (set-fontset-font nil 'symbol "-misc-fixed-*-*-*--13-*-*-*-*-*-*-*") |
|
339 ;; MODIFIER LETTER is not present in terminus, this includes ˌːˈ characters. |
|
340 (set-fontset-font nil '(#x02C0 . #x02FF) "-misc-fixed-*-*-*--13-*-*-*-*-*-*-*") ) |
|
341 ((eq window-system 'w32) |
|
342 (set-frame-font "Courier New-10:antialias=none") )) |
|
343 |