diff options
-rw-r--r-- | lisp/acdw-setup.el | 11 |
1 files changed, 11 insertions, 0 deletions
diff --git a/lisp/acdw-setup.el b/lisp/acdw-setup.el index e271faa..eb4d12b 100644 --- a/lisp/acdw-setup.el +++ b/lisp/acdw-setup.el | |||
@@ -87,5 +87,16 @@ package. This macro is not repeatable." | |||
87 | (let ((recipe (cadr sexp))) | 87 | (let ((recipe (cadr sexp))) |
88 | (if (consp recipe) (car recipe) recipe)))) | 88 | (if (consp recipe) (car recipe) recipe)))) |
89 | 89 | ||
90 | ;; https://www.emacswiki.org/emacs/SetupEl | ||
91 | (setup-define :load-after | ||
92 | (lambda (&rest features) | ||
93 | (let ((body `(require ',(setup-get 'feature)))) | ||
94 | (dolist (feature (if (listp features) | ||
95 | (nreverse features) | ||
96 | (list features))) | ||
97 | (setq body `(with-eval-after-load ',feature ,body))) | ||
98 | body)) | ||
99 | :documentation "Load the current feature after FEATURES.") | ||
100 | |||
90 | (provide 'acdw-setup) | 101 | (provide 'acdw-setup) |
91 | ;;; acdw-setup.el ends here | 102 | ;;; acdw-setup.el ends here |