From 52d60d12970fe8c1544bbf03188e9df1342c1cc7 Mon Sep 17 00:00:00 2001
From: Maciej Szlosarczyk <maciej.szlosarczyk@inbank.ee>
Date: Fri, 25 Aug 2017 13:59:33 +0300
Subject: [PATCH] Change themes, remove trailing whitespace on save

---
 behaviour.el |  3 +++
 themes.el    |  2 +-
 windows.el   | 21 ++++++++++++++++++++-
 3 files changed, 24 insertions(+), 2 deletions(-)

diff --git a/behaviour.el b/behaviour.el
index 8b11967..930babb 100644
--- a/behaviour.el
+++ b/behaviour.el
@@ -45,6 +45,9 @@
 
 ;; Enable y/n answers to questions
 (fset 'yes-or-no-p 'y-or-n-p)
+
+;; Trim trailing whitespace on save
+(add-hook 'before-save-hook 'delete-trailing-whitespace)
 ;;;;;;;;;;;;;;;;;;;;;;;; code behaviour ;;;;;;;;;;;;;;;;;;;;;;;;;;;
 
 ; Add ruler at 80, do not wrap lines (can be overwritten later)
diff --git a/themes.el b/themes.el
index 1b9a5c4..9b8dcd5 100644
--- a/themes.el
+++ b/themes.el
@@ -41,7 +41,7 @@
 (require 'helm-themes)
 (if (display-graphic-p)
     (progn
-      (enable-theme 'base16-unikitty-light)
+      (enable-theme 'base16-mexico-light)
       (base16-summerfruit-light-custom))
   (progn
     (color-theme-approximate-on)
diff --git a/windows.el b/windows.el
index 6aa89bb..d8cdf32 100644
--- a/windows.el
+++ b/windows.el
@@ -2,6 +2,25 @@
 ;;; Commentary:
 ;;; Windows management things, mostly with purpose
 ;;; Code:
-(purpose-mode)
+(purpose-mode t)
+
+(add-to-list 'purpose-user-regexp-purposes '("_spec.rb\\(<.*>\\)?$" . test))
+(add-to-list 'purpose-user-mode-purposes '(ruby-mode . edit))
+(add-to-list 'purpose-user-mode-purposes '(yaml-mode . edit))
+(add-to-list 'purpose-user-mode-purposes '(emacs-lisp-mode . edit))
+(add-to-list 'purpose-user-mode-purposes '(web-mode . edit))
+(add-to-list 'purpose-user-mode-purposes '(html-mode . edit))
+(add-to-list 'purpose-user-mode-purposes '(scss-mode . test))
+(add-to-list 'purpose-user-mode-purposes '(css-mode . test))
+(add-to-list 'purpose-user-mode-purposes '(javascript-mode . edit))
+(add-to-list 'purpose-user-mode-purposes '(magit-mode . tr))
+(add-to-list 'purpose-user-mode-purposes '(dired-mode . tr))
+(add-to-list 'purpose-user-mode-purposes '(compilation-mode . tr))
+(add-to-list 'purpose-user-mode-purposes '(help-mode . br))
+(add-to-list 'purpose-user-mode-purposes '(special-mode . br))
+
+
+(setq purpose-use-default-configuration nil)
+(purpose-compile-user-configuration)
 
 ;;; windows.el ends here