First commit.

lisp/lib/bootstrap.el

@@ -0,0 +1,28 @@
+;;; bootstrap.el --- Helpers for bootstrapping Emacs. -*- lexical-binding: t; -*-
+;;; Commentary:
+
+;; Stolen from Alexx Ott, https://github.com/alexott/dotemacs
+
+;;; Code:
+
+(declare-function 'path-join "path")
+
+
+(defun load-all-files-from-dir (dir)
+  "Load all Emacs Lisp files in DIR."
+  (dolist (f (directory-files dir))
+    (when (and
+           (file-directory-p (path-join dir f))
+           (not (string= "." f))
+           (not (string= ".." f)))
+      (load-all-files-from-dir (path-join dir f)))
+    (when (and
+           (not (file-directory-p (path-join dir f)))
+           (not (string= "bootstrapper.el" f))
+           (not (string= ".#" (substring f 0 2)))
+           (string= ".el" (substring f (- (length f) 3))))
+      (load-file (path-join dir f)))))
+
+
+(provide 'lib/bootstrap)
+;;; bootstrap.el ends here