glob init files files for loading

1 files changed, 31 insertions, 0 deletions

diff --git a/init/10-km-pkg.el b/init/10-km-pkg.el
new file mode 100644
index 0000000..91c0462
--- /dev/null
+++ b/init/10-km-pkg.el
@@ -0,0 +1,31 @@
+;; http://www.aaronbedra.com/emacs.d/
+
+(require 'package)
+(add-to-list 'package-archives
+             '("melpa" . "http://melpa.milkbox.net/packages/") t)
+(package-initialize)
+
+(require 'cl)
+(defvar km/packages '(
+                        evil
+                        undo-tree
+                        key-chord
+                        org
+                        ess
+                        lua-mode
+                        haskell-mode
+                        )
+  "Default packages")
+
+(defun km/packages-installed-p ()
+  (loop for pkg in km/packages
+        when (not (package-installed-p pkg)) do (return nil)
+        finally (return t)))
+
+(unless (km/packages-installed-p)
+  (message "%s" "Refreshing package database...")
+  (package-refresh-contents)
+  (dolist (pkg km/packages)
+    (when (not (package-installed-p pkg))
+      (message "installing %s" pkg)
+      (package-install pkg))))