diff options
| -rw-r--r-- | emacs.d/core/core-ui.el | 20 |
1 files changed, 18 insertions, 2 deletions
diff --git a/emacs.d/core/core-ui.el b/emacs.d/core/core-ui.el index 07132f7..4a3e36a 100644 --- a/emacs.d/core/core-ui.el +++ b/emacs.d/core/core-ui.el @@ -1,3 +1,19 @@ +(defvar fcuny/font-family "Source Code Pro") +(defvar fcuny/font-size 140) + +(defun fcuny/set-font-size (size) + (set-face-attribute 'default nil :height size)) + +(defun fcuny/regular-mode () + (interactive) + (set-frame-font fcuny/font-family) + (fcuny/set-font-size fcuny/font-size)) + +(defun fcuny/presentation-mode () + (interactive) + (set-frame-font fcuny/font-family) + (fcuny/set-font-size 190)) + ;; no menu (menu-bar-mode -1) @@ -9,7 +25,7 @@ ;; no startup screen (setq inhibit-startup-message t) -(setq initial-scratch-message ";; scratch buffer") +(setq initial-scratch-message "") ;; highlight the current line (global-hl-line-mode +1) @@ -30,7 +46,7 @@ ;;hide menu-bar (menu-bar-mode +1) ;; set the font size and family - (custom-set-faces '(default ((t (:height 130 :family "Droid Sans Mono")))))) + (fcuny/regular-mode)) (require 'whitespace) (global-whitespace-mode 1) |