Cleanup auto-init function
This commit is contained in:
parent
1bda53e97d
commit
96e30cf2a0
1 changed files with 5 additions and 4 deletions
|
@ -45,10 +45,11 @@
|
|||
|
||||
The loaded file should be `LIBRARY-init', either `.el' or `.elc'
|
||||
will do."
|
||||
`(with-eval-after-load ',library
|
||||
(load ,(concat (if (symbolp library)
|
||||
(symbol-name library)
|
||||
library) "-init"))))
|
||||
(let ((name (if (symbolp library)
|
||||
(symbol-name library)
|
||||
library)))
|
||||
`(with-eval-after-load ',library
|
||||
(load ,(concat name "-init")))))
|
||||
|
||||
;; http://www.lunaryorn.com/2013/06/25/introducing-with-eval-after-load/
|
||||
(defmacro stante-after (feature &rest forms)
|
||||
|
|
Loading…
Reference in a new issue