From 71817c1969da96a257d0d86f1cff55c02133f499 Mon Sep 17 00:00:00 2001 From: Steve Purcell Date: Thu, 7 Aug 2014 10:52:27 +0100 Subject: [PATCH] After building with C-c C-c, display the result more helpfully --- package-build.el | 11 +++++++++-- 1 file changed, 9 insertions(+), 2 deletions(-) diff --git a/package-build.el b/package-build.el index 06ad7b34..8d780a74 100644 --- a/package-build.el +++ b/package-build.el @@ -1148,8 +1148,15 @@ 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) - (with-output-to-temp-buffer "*package-build-result*" - (pp (assoc pkg-name (package-build-archive-alist)))) + (let ((output-buffer-name "*package-build-result*")) + (with-output-to-temp-buffer output-buffer-name + (princ ";; Please check the following package descriptor.\n") + (princ ";; If the correct package description or dependencies are missing,\n") + (princ ";; then the source .el file is likely malformed, and should be fixed.\n") + (pp (assoc pkg-name (package-build-archive-alist)))) + (with-current-buffer output-buffer-name + (emacs-lisp-mode) + (view-mode))) (when (yes-or-no-p "Install new package? ") (package-install-file (pb/find-package-file pkg-name)))))