diff --git a/global.org b/global.org index c892217..be45e6a 100644 --- a/global.org +++ b/global.org @@ -85,6 +85,15 @@ (lambda (binding) (define-key keymap (kbd (car binding)) (cdr binding))) binding-alist)) #+END_SRC + This is a hack to remove slant and bold from all faces + #+BEGIN_SRC emacs-lisp + (defun wilder/fixup-faces () + (mapc (lambda (face) + (set-face-attribute face nil :weight 'normal) + (set-face-attribute face nil :slant 'normal)) + (face-list)) + (set-face-font 'default "-xos4-hackminus-medium-r-normal--20-200-72-72-c-100-ISO10646-1")) + #+END_SRC ** Cosmetics Prefer a minimal appearance: no menu, toolbar or scroll-bars; no splash screens or messages @@ -1476,13 +1485,10 @@ have loaded in the meantime; yet it does not wark perfectly as some packages are still to be loaded (most notably ~magit~) #+BEGIN_SRC emacs-lisp - ;; (set-face-font 'default "-xos4-hackminus-medium-r-normal--20-200-72-72-c-100-ISO10646-1") - (set-face-bold 'bold nil) - (mapc - (lambda (face) - (set-face-attribute face nil :weight 'normal) - (set-face-attribute face nil :slant 'normal)) - (face-list)) + ;; (set-face-font 'default "-xos4-hackminus-medium-r-normal--20-200-72-72-c-100-ISO10646-1") + (set-face-bold 'bold nil) + (wilder/fixup-faces) + (with-eval-after-load "info" (wilder/fixup-faces) nil) #+END_SRC ** Start server