awesome-emacs/doomemacs
1
0
Fork 0
mirror of https://github.com/doomemacs/doomemacs synced 2025-08-05 12:37:33 -05:00
Code Issues Packages Projects Releases Wiki Activity

New add-load-path! convenience macro

Browse Source
This commit is contained in:
Henrik Lissner
2019-10-23 04:24:06 -04:00
parent e1622142ed
commit f4acb3cefd
1 changed files with 8 additions and 0 deletions
Download Patch File Download Diff File Expand all files Collapse all files

8
core/core-lib.el
View File

@ -199,6 +199,14 @@ If FETCHER is a function, ELT is used as the key in LIST (an alist)."
elt) elt)
,list))) ,list)))
(defmacro add-load-path! (&rest dirs)
"Add DIRS to `load-path', relative to the current file.
The current file is the file from which `add-to-load-path!' is used."
`(let ((default-directory ,(dir!))
file-name-handler-alist)
(dolist (dir (list ,@dirs))
(cl-pushnew (expand-file-name dir) load-path))))
(defmacro add-transient-hook! (hook-or-function &rest forms) (defmacro add-transient-hook! (hook-or-function &rest forms)
"Attaches a self-removing function to HOOK-OR-FUNCTION. "Attaches a self-removing function to HOOK-OR-FUNCTION.