summary refs log tree commit diff
diff options
context:
space:
mode:
authorFranck Cuny <franck.cuny@gmail.com>2016-10-26 15:46:34 -0700
committerFranck Cuny <franck.cuny@gmail.com>2016-10-26 15:46:34 -0700
commitf47c9b6c231fa20bc000a69072a89b1b4b231bf4 (patch)
treeb9275f539e728b3cba9ebb0fb61b83e02f4b51d1
parent[bash] Add time (UTC) to my prompt. (diff)
downloademacs.d-f47c9b6c231fa20bc000a69072a89b1b4b231bf4.tar.gz
[emacs] Some changes to the UI.
-rw-r--r--emacs.d/lib/my-settings.el14
1 files changed, 6 insertions, 8 deletions
diff --git a/emacs.d/lib/my-settings.el b/emacs.d/lib/my-settings.el
index efdc410..e8931ea 100644
--- a/emacs.d/lib/my-settings.el
+++ b/emacs.d/lib/my-settings.el
@@ -1,3 +1,6 @@
+(dolist (mode '(tool-bar-mode scroll-bar-mode))
+  (when (fboundp mode) (funcall mode -1)))
+
 ;; auto close bracket insertion
 (electric-pair-mode 1)
 
@@ -38,14 +41,9 @@
 ;; show parenthesis
 (show-paren-mode +1)
 
-;; no blink cursor
+;; no blinking cursor
 (blink-cursor-mode -1)
 
-(when window-system
-  (tool-bar-mode 0)
-  (scroll-bar-mode 0)
-  (menu-bar-mode -1))
-
 ;; I don't want a frindge on the right
 (fringe-mode '(4 . 0))
 
@@ -53,7 +51,7 @@
 (setq frame-title-format '( "%b" " [" (:eval mode-name) "]"))
 
 ;; Set default font. Large font for the main window, but small font for the modeline
-(set-face-attribute 'default nil :family "Menlo" :height 150 :weight 'normal :width 'normal)
-(set-face-attribute 'mode-line nil  :height 120)
+(set-face-attribute 'default nil :family "Menlo" :height 130 :weight 'normal :width 'normal)
+(set-face-attribute 'mode-line nil  :height 110)
 
 (provide 'my-settings)