Initial commit

1 files changed, 24 insertions, 0 deletions

diff --git a/lisp/init-utils.el b/lisp/init-utils.el
new file mode 100644
index 0000000..64dadc6
--- /dev/null
+++ b/lisp/init-utils.el
@@ -0,0 +1,24 @@
+;; Loads functions from libs
+(defun load-directory (dir)
+  (let ((load-it (lambda (f)
+                   (load-file (concat (file-name-as-directory dir) f)))
+		 ))
+    (mapc load-it (directory-files dir nil "\\.el$"))))
+
+;; Load lib functions
+(load-directory (expand-file-name "~/.emacs.d/lisp/lib/" user-emacs-directory))
+
+;; This is borrowed from https://github.com/purcell/emacs.d/blob/master/lisp/init-utils.el by Steve Purcell but I have added some stuff.
+
+(if (fboundp 'with-eval-after-load)
+    (defalias 'after-load 'with-eval-after-load)
+  (defmacro after-load (feature &rest body)
+    "After FEATURE is loaded, evaluate BODY."
+    (declare (indent defun))
+    '(eval-after-load ,feature
+       '(progn ,@body))))
+
+;; Elapsed time
+(myemacs/elapsed-time)
+
+(provide 'init-utils)