procyberian/emacs
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

* Clean-up temporary eln test-suite directory when exiting (bug#48060)

Browse source 
* lisp/startup.el (normal-top-level): Remove eln test-suite temp
	dir when exiting.
This commit is contained in:
Andrea Corallo 2021-04-27 23:10:05 +02:00
parent 4e1e0b9dec
commit c62262736c
1 changed files with 3 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

4
lisp/startup.el
View file

@ -550,7 +550,9 @@ It is the default value of the variable `top-level'."
;; testsuite, add a temporary folder in front to produce there
;; new compilations.
(when (equal (getenv "HOME") "/nonexistent")
(push (make-temp-file "emacs-testsuite-" t) comp-eln-load-path)))
(let ((tmp-dir (make-temp-file "emacs-testsuite-" t)))
(add-hook 'kill-emacs-hook (lambda () (delete-directory tmp-dir t)))
(push tmp-dir comp-eln-load-path))))
;; Look in each dir in load-path for a subdirs.el file. If we
;; find one, load it, which will add the appropriate subdirs of
;; that dir into load-path. This needs to be done before setting