From 346a4a10cba72bcbfeeca266ffb32810550c37cd Mon Sep 17 00:00:00 2001 From: Jim Myhrberg Date: Wed, 23 Sep 2020 18:53:17 +0100 Subject: [PATCH] chore(native-comp): simplify eln-cache dir setup --- early-init.el | 11 ++--------- 1 file changed, 2 insertions(+), 9 deletions(-) diff --git a/early-init.el b/early-init.el index 7ef0904..3625f89 100644 --- a/early-init.el +++ b/early-init.el @@ -10,15 +10,8 @@ (setq comp-speed 2) (when (boundp 'comp-eln-load-path) - (let ((eln-cache-dir (expand-file-name "cache/eln-cache/" - user-emacs-directory)) - (find-exec (executable-find "find"))) - (setcar comp-eln-load-path eln-cache-dir) - ;; Quitting emacs while native compilation in progress can leave zero byte - ;; sized *.eln files behind. Hence delete such files during startup. - (when find-exec - (call-process find-exec nil nil nil eln-cache-dir - "-name" "*.eln" "-size" "0" "-delete")))) + (setcar comp-eln-load-path + (expand-file-name "cache/eln-cache/" user-emacs-directory))) ;; Defer garbage collection further back in the startup process (setq gc-cons-threshold most-positive-fixnum)