initial minimal setup

1 files changed, 62 insertions, 0 deletions

diff --git a/init.el b/init.el
new file mode 100644
index 0000000..0fe1d55
--- /dev/null
+++ b/init.el
@@ -0,0 +1,62 @@
+;; Suppress splash screen
+(setq inhibit-startup-message t)
+
+(setq settings-dir
+      (expand-file-name "settings" user-emacs-directory))
+(add-to-list 'load-path settings-dir)
+
+(setq custom-file (expand-file-name "custom.el" user-emacs-directory))
+(load custom-file)
+
+;; Write backup files to own directory
+(setq backup-directory-alist
+      `(("." . ,(expand-file-name
+		 (concat user-emacs-directory "backups")))))
+
+;; Are we on a mac?
+(setq is-mac (equal system-type 'darwin))
+
+(require 'setup-package)
+
+(defun init--install-packages()
+  (packages-install
+   '(cider
+     clojure-mode
+     clojure-mode-extra-font-locking
+     clojure-snippets
+     dash
+     flycheck
+     flycheck-clojure
+     highlight-escape-sequences
+     ido-vertical-mode
+     markdown-mode
+     multiple-cursors
+     paredit
+     visual-regexp
+     yasnippet)))
+
+(condition-case nil
+    (init--install-packages)
+  (error
+   (package-refresh-contents)
+   (init--install-packages)))
+
+(require 'sane-defaults)
+
+(when is-mac
+  (require-package 'exec-path-from-shell)
+  (exec-path-from-shell-initialize))
+
+(require 'setup-ido)
+(require 'setup-clojure-mode)
+(require 'setup-markdown-mode)
+(require 'setup-multiple-cursors)
+
+(require 'visual-regexp)
+(define-key global-map (kbd "M-&") 'vr/query-replace)
+(define-key global-map (kbd "M-/") 'vr/replace)
+
+;; full power
+(put 'downcase-region 'disabled nil)
+(put 'upcase-region 'disabled nil)
+(put 'narrow-to-region 'disabled nil)