diff options
| -rw-r--r-- | test/automated/package-test.el | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/test/automated/package-test.el b/test/automated/package-test.el index 2fbcfd06140..4385ee0bd48 100644 --- a/test/automated/package-test.el +++ b/test/automated/package-test.el | |||
| @@ -125,6 +125,9 @@ | |||
| 125 | '((package-test-archive-upload-base (make-temp-file "pkg-archive-base-" t)) | 125 | '((package-test-archive-upload-base (make-temp-file "pkg-archive-base-" t)) |
| 126 | (package-archive-upload-base package-test-archive-upload-base)) | 126 | (package-archive-upload-base package-test-archive-upload-base)) |
| 127 | (list (cl-gensym)))) ;; Dummy value so `let' doesn't try to bind `nil' | 127 | (list (cl-gensym)))) ;; Dummy value so `let' doesn't try to bind `nil' |
| 128 | (let ((buf (get-buffer "*Packages*"))) | ||
| 129 | (when (buffer-live-p buf) | ||
| 130 | (kill-buffer buf))) | ||
| 128 | (unwind-protect | 131 | (unwind-protect |
| 129 | (progn | 132 | (progn |
| 130 | ,(if basedir `(cd ,basedir)) | 133 | ,(if basedir `(cd ,basedir)) |