aboutsummaryrefslogtreecommitdiffstats
path: root/lisp/init-utils.el
diff options
context:
space:
mode:
Diffstat (limited to 'lisp/init-utils.el')
-rw-r--r--lisp/init-utils.el24
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)