Commit 23d2ffcb authored by Damien Cassou's avatar Damien Cassou

el-get must honor `el-get-byte-compile' even for init files

Signed-off-by: 's avatarDamien Cassou <damien.cassou@gmail.com>
parent db6a5596
......@@ -65,11 +65,13 @@ compiled version."
(let* ((init-file-name (format "init-%s.el" package))
(package-init-file
(expand-file-name init-file-name el-get-user-package-directory))
(compiled-init-file (concat (file-name-sans-extension package-init-file) ".elc")))
(file-name-no-extension (file-name-sans-extension package-init-file))
(compiled-init-file (concat file-name-no-extension ".elc")))
(when (file-exists-p package-init-file)
(el-get-byte-compile-file package-init-file)
(el-get-verbose-message "el-get: load %S" compiled-init-file)
(load compiled-init-file 'noerror)))))
(when el-get-byte-compile
(el-get-byte-compile-file package-init-file))
(el-get-verbose-message "el-get: load %S" file-name-no-extension)
(load file-name-no-extension 'noerror)))))
(defun el-get-recipe-dirs ()
"Return the elements of el-get-recipe-path that actually exist.
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment