* test/automated/package-test.el (with-package-test): Kill Packages buffer

This commit is contained in:
Artur Malabarba 2015-04-12 16:10:22 +01:00
parent e99d8cb25d
commit fe3b5b3f45

View file

@ -125,6 +125,9 @@
'((package-test-archive-upload-base (make-temp-file "pkg-archive-base-" t))
(package-archive-upload-base package-test-archive-upload-base))
(list (cl-gensym)))) ;; Dummy value so `let' doesn't try to bind `nil'
(let ((buf (get-buffer "*Packages*")))
(when (buffer-live-p buf)
(kill-buffer buf)))
(unwind-protect
(progn
,(if basedir `(cd ,basedir))