 
 (bind-key "RET" 'newline-and-indent)
 (bind-key "S-RET" 'crux-smart-open-line)
-(bind-key "M-r" '(lambda ()
-                   (interactive)
-                   (call-interactively (if (get-buffer "*compilation*")
-                                           'recompile
-                                         'compile))))
+(bind-key "M-r" #'(lambda ()
+                    (interactive)
+                    (call-interactively (if (get-buffer "*compilation*")
+                                            'recompile
+                                          'compile))))
 (bind-key "M-R" 'shell-command)
 ;; (bind-key "M-o" 'other-window)
 


(setenv "PAGER" (executable-find "cat"))

(bind-key "C-c t" '(lambda ()
                     (interactive)
                     (crux-start-or-switch-to 'shell "*shell*")))

(require 'volatile-highlights)
(volatile-highlights-mode t)

(add-to-list 'grep-find-ignored-directories "build")
(add-to-list 'grep-find-ignored-directories "_darcs")

(bind-key "M-g" #'(lambda ()
                    (interactive)
                    (save-some-buffers t nil)
                    (helm-grep-ag (projectile-project-root) current-prefix-arg)))

(bind-key* "M-G" #'(lambda ()
                     (interactive)
                     (save-some-buffers t nil)
                     (helm-grep-ag (helm-current-directory) current-prefix-arg)))

(require 'shackle)
(setq shackle-rules
