From fa59eafd9a8becdfcc9819fd6730506dcb48fc94 Mon Sep 17 00:00:00 2001 From: Ivan Malison Date: Mon, 10 Nov 2014 04:37:48 -0800 Subject: [PATCH] Add hook to set font emacs. --- init.el | 9 ++++++++- 1 file changed, 8 insertions(+), 1 deletion(-) diff --git a/init.el b/init.el index abe4ade5..9816d650 100644 --- a/init.el +++ b/init.el @@ -454,6 +454,13 @@ buffer is not visiting a file." (setq hl-line-mode nil)) (advice-add 'load-theme :after #'remove-fringe-and-hl-line-mode) - + ;; enable to set theme based on time of day. (run-at-time "00:00" 3600 'set-theme) + +(add-hook 'after-make-frame-functions + (lambda (frame) + (condition-case exp + (set-default-font "monaco-11" nil t) + ('error (package-refresh-contents) + (set-default-font "menlo-11" nil t) nil))))