master 22e5239: Clean up temporary files after package tests

[Stefan Kangas]

branch: master
commit 22e5239c172ccc603b1f0def87aeabc3ccdb61c6
Author: Stefan Kangas <stefan@marxist.se>
Commit: Stefan Kangas <stefan@marxist.se>

    Clean up temporary files after package tests
    
    * test/lisp/emacs-lisp/package-tests.el (with-package-test): Remove
    temporary files after test.  (Bug#43359)
---
 test/lisp/emacs-lisp/package-tests.el | 9 +++++++++
 1 file changed, 9 insertions(+)

diff --git a/test/lisp/emacs-lisp/package-tests.el 
b/test/lisp/emacs-lisp/package-tests.el
index 155a8e6..2326754 100644
--- a/test/lisp/emacs-lisp/package-tests.el
+++ b/test/lisp/emacs-lisp/package-tests.el
@@ -151,6 +151,15 @@
                     `(insert-file-contents ,file))
                ,@body)))
 
+       (when ,upload-base
+         (dolist (f '("archive-contents"
+                      "simple-single-1.3.el"
+                      "simple-single-1.4.el"
+                      "simple-single-readme.txt"))
+           (ignore-errors
+             (delete-file
+              (expand-file-name f package-test-archive-upload-base))))
+         (delete-directory package-test-archive-upload-base))
        (when (file-directory-p package-test-user-dir)
          (delete-directory package-test-user-dir t))