(set-frame-font (font-spec :family "DejaVu Sans Mono" :weight 'normal :height 110)) (set-face-attribute 'default nil :height 110)
(add-to-list 'default-frame-alist '(font . "-UKWN-Martian Mono-normal-normal-normal-*-*-100-*-*-m-0-iso10646-1"))
(defun use-dired-font () "Switch the current buffer to a specific font." (setq buffer-face-mode-face '(:family "DejaVu Sans Mono" :height 110 :width semi-condensed :weight normal)) (buffer-face-mode))
(add-hook 'dired-mode-hook 'use-dired-font)
(set-fontset-font t 'greek (font-spec :family "DejaVu Sans Mono" :weight 'bold))