Remove redundant straight--build-compile advice

May address #4778 and #4783
This commit is contained in:
Henrik Lissner 2021-03-11 11:44:18 -05:00
parent abec86310b
commit 26319322b2

View file

@ -426,18 +426,6 @@ everywhere we use it (and internally)."
cause)
interactive)))
(defadvice! doom--straight-inject-load-path-a (orig-fn &rest args)
"Straight builds packages in an isolated Emacs child process, which means
needed packages may not be accessible when a package is compiled."
:override #'straight--build-compile
(let* ((package (plist-get recipe :package))
(dir (straight--build-dir package)))
(call-process (concat invocation-directory invocation-name)
nil straight-byte-compilation-buffer nil
"-Q" "--batch"
"--eval" (prin1-to-string `(setq load-path (cons ,dir ',load-path)))
"--eval" (format "(byte-recompile-directory %S 0 'force)" dir))))
;;
;;; Entry point