Change directory lisp/ to modules/

FS #2
This commit is contained in:
Jesús
2019-01-22 15:45:41 -05:00
parent d0f44d8546
commit ced0fe8f9e
44 changed files with 366 additions and 68 deletions

31
modules/init-utils.el Normal file
View File

@@ -0,0 +1,31 @@
;;; init-utils.el --- .Emacs Configuration -*- lexical-binding: t -*-
;;; Commentary:
;;
;;; Code:
;; Loads functions from libs
(defun load-directory (dir)
"Load functions from the libs DIR.
read the .el files"
(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/modules/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
(load-file "~/.emacs.d/modules/lib/myemacs.el")
(provide 'init-utils)
;;; init-utils.el ends here