diff --git a/package-build.el b/package-build.el
index 747ef256..1541f549 100644
--- a/package-build.el
+++ b/package-build.el
@@ -956,11 +956,8 @@ Returns the archive entry for the package."
   (let ((pkg-name (intern (file-name-nondirectory (buffer-file-name)))))
     (package-build-archive pkg-name)
     (package-build-dump-archive-contents)
-    (save-current-buffer
-      (switch-to-buffer-other-window
-       (find-file-noselect
-        (expand-file-name "archive-contents" package-build-archive-dir) t))
-      (revert-buffer t t))
+    (with-output-to-temp-buffer "*package-build-result*"
+      (pp (assoc pkg-name (package-build-archive-alist))))
     (when (yes-or-no-p "Install new package? ")
       (package-install-file (pb/find-package-file pkg-name)))))