Explorar el Código

Put with-no-warnings on here so gui stuff doesn't leak into commandline.

cray
Mitch Tishmack hace 11 años
padre
commit
98514065b3
Se han modificado 1 ficheros con 7 adiciones y 5 borrados
  1. +7
    -5
      emacs/.emacs.d/emacs.org

+ 7
- 5
emacs/.emacs.d/emacs.org Ver fichero

@@ -433,11 +433,13 @@ List of fonts in order of preference.
Set preferred font list when we're in a gui emacs session.

#+BEGIN_SRC emacs-lisp
(when window-system
(if (find-font (font-spec :name (car my/gui-fonts)))
(progn (set-frame-font (car my/gui-fonts))
(set-face-attribute 'default nil :height 180))
(progn (set-gui-font (cdr my/gui-fonts))))
(with-no-warnings
(when window-system
(if (find-font (font-spec :name (car my/gui-fonts)))
(progn (set-frame-font (car my/gui-fonts))
(set-face-attribute 'default nil :height 180))
(progn (set-gui-font (cdr my/gui-fonts))))
)
)
#+END_SRC



Cargando…
Cancelar
Guardar