1 files changed, 65 insertions, 0 deletions
diff --git a/emacs.d/lib/settings.el b/emacs.d/lib/settings.el
new file mode 100644
index 0000000..b123c1d
--- /dev/null
+++ b/emacs.d/lib/settings.el
@@ -0,0 +1,65 @@
+(dolist (mode '(tool-bar-mode scroll-bar-mode))
+  (when (fboundp mode) (funcall mode -1)))
+
+;; auto close bracket insertion
+(electric-pair-mode 1)
+
+;; ?
+(add-hook 'prog-mode-hook
+          (lambda () (setq show-trailing-whitespace t)))
+
+;; this makes emacs slow to work with source
+(delete 'Git vc-handled-backends)
+
+;; alias yes-or-no to y-or-n
+(fset 'yes-or-no-p 'y-or-n-p)
+
+;; set utf-8 as the default encoding
+(prefer-coding-system 'utf-8-unix)
+(set-terminal-coding-system 'utf-8)
+(set-keyboard-coding-system 'utf-8)
+
+;; reload the buffer when a file changes
+(global-auto-revert-mode 1)
+
+;; global settings for built-in emacs parameters
+(setq auto-save-default nil
+      auto-save-list-file-prefix nil
+      inhibit-startup-screen t
+      initial-scratch-message nil
+      make-backup-files nil
+      require-final-newline t
+      vc-follow-symlinks t
+      next-screen-context-lines 5
+      column-number-mode t
+      ring-bell-function 'ignore
+      tab-always-indent 'complete)
+
+;; How long to display an echo-area message when the minibuffer is active.
+(setq minibuffer-message-timeout 0.5)
+
+(setq-default indent-tabs-mode nil
+              create-lockfiles nil)
+
+;; show parenthesis
+(show-paren-mode +1)
+
+;; no blinking cursor
+(blink-cursor-mode -1)
+
+;; I don't want a frindge on the right
+(fringe-mode '(4 . 0))
+
+;; frame title
+(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 160 :weight 'normal :width 'normal)
+(set-face-attribute 'mode-line nil  :height 110 :background "grey90")
+
+;; nicer background than plain white
+(set-face-background 'default "#FAF6EB")
+
+(setq custom-file (expand-file-name "var/emacs-custom.el" user-emacs-directory))
+
+(provide 'settings)