From bf729d6ea366a514f066c4c298811c925aab9e8b Mon Sep 17 00:00:00 2001
From: Maciej Szlosarczyk <maciej.szlosarczyk@inbank.ee>
Date: Mon, 29 May 2017 11:21:05 +0300
Subject: [PATCH] Compile files to elc

---
 .gitignore   |  1 +
 behaviour.el |  6 ++----
 functions.el | 17 +++++++++++++++++
 languages.el |  5 ++---
 themes.el    |  2 +-
 5 files changed, 23 insertions(+), 8 deletions(-)

diff --git a/.gitignore b/.gitignore
index 03728c4..165ed6b 100644
--- a/.gitignore
+++ b/.gitignore
@@ -2,3 +2,4 @@ auto-save-list
 projectile*
 backups
 elpa
+*.elc
diff --git a/behaviour.el b/behaviour.el
index 93d9cc4..3f1e56f 100644
--- a/behaviour.el
+++ b/behaviour.el
@@ -1,7 +1,6 @@
 ;;; behaviour.el ---  how emacs should behave
 ;;; Commentary:
 ;;; Code:
-;;; Safely save garbage files into emacs.d
 
 ;;;;;;;;;;;;;;;;;;;;;;;; Overall behaviour ;;;;;;;;;;;;;;;;;;;;;;;;;;;
 (setq backup-directory-alist
@@ -151,6 +150,8 @@
 ;; Show projectile lists by most recently active
 (setq projectile-sort-order (quote recently-active))
 
+;; (add-hook 'projectile-find-file-hook 'projectile-invalidate-cache)
+
 ; Use VIM mode
 (require 'evil)
 (require 'evil-leader)
@@ -196,7 +197,4 @@ You can disable `clean-buffer-list' by (cancel-timer clean-buffer-list-timer)."
 (setq clean-buffer-list-kill-never-regexps
       (append '("^\\*EMMS Playlist\\*.*$")
 	      clean-buffer-list-kill-never-regexps-init))
-
-;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; Additional loads ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
-(load "~/.emacs.d/languages.el")
 ;;; behaviour.el ends here
diff --git a/functions.el b/functions.el
index 23481ae..d8201a3 100644
--- a/functions.el
+++ b/functions.el
@@ -24,4 +24,21 @@
   (set-face-attribute 'helm-header nil :font
                       (format "Hasklig %d"
                               (+ size 2))))
+
+;;;; Functions related to compilation of files
+(defun byte-compile-init-dir ()
+  "Byte-compile all your dotfiles."
+  (interactive)
+  (byte-recompile-directory user-emacs-directory 0))
+
+(defun remove-elc-on-save ()
+  "If you're saving an elisp file, likely the .elc is no longer valid."
+  (add-hook 'after-save-hook
+            (lambda ()
+              (if (file-exists-p (concat buffer-file-name "c"))
+                  (delete-file (concat buffer-file-name "c"))))
+            nil
+            t))
+
+(add-hook 'emacs-lisp-mode-hook 'remove-elc-on-save)
 ;;; functions.el ends here
diff --git a/languages.el b/languages.el
index aec7660..84922e2 100644
--- a/languages.el
+++ b/languages.el
@@ -91,8 +91,7 @@
 
   (set-indent 2)
 
-  (flycheck-mode 1)
-  (set-width 80))
+  (flycheck-mode 1))
 
 (add-hook 'emacs-lisp-mode-hook 'elisp-mode-config)
 (add-hook 'emacs-lisp-mode-hook 'flycheck-mode)
@@ -114,7 +113,7 @@
 
 (add-hook 'html-mode-hook 'web-mode)
 (add-hook 'html-mode-hook 'web-mode-config)
-(add-hook 'markdown-mode-hook 'set-width-120)
+(add-hook 'html-mode-hook 'set-width-120)
 
 (setq web-mode-markup-indent-offset 2)
 (setq web-mode-code-indent-offset 2)
diff --git a/themes.el b/themes.el
index 31dce62..d3329d8 100644
--- a/themes.el
+++ b/themes.el
@@ -24,7 +24,7 @@
                       :background "#2c3a47")
 
   (set-face-attribute 'font-lock-comment-delimiter-face nil
-                      :foreground "#5F6D7A")
+                      :foreground "#aabcce")
   (set-face-attribute 'mode-line nil :font "Hasklig 13")
   (set-face-attribute 'fringe nil :background "#2c3a47"
                       :slant 'normal))