From 26629bf3a5b8d0228be23827bb86dbd8d8087378 Mon Sep 17 00:00:00 2001 From: SpacemacsBot Date: Thu, 15 Jun 2023 09:18:11 +0000 Subject: [PATCH] [bot] "built_in_updates" Thu Jun 15 09:18:11 UTC 2023 --- core/libs/package-build.el | 12 ++++++++---- 1 file changed, 8 insertions(+), 4 deletions(-) diff --git a/core/libs/package-build.el b/core/libs/package-build.el index a50aeb3067e4..8d2cf7aeaa1c 100644 --- a/core/libs/package-build.el +++ b/core/libs/package-build.el @@ -227,6 +227,9 @@ disallowed." (defvar package-build--inhibit-checkout nil "Whether to inhibit checkout. Useful for testing purposes.") +(defvar package-build--inhibit-build nil + "Whether to inhibit building. Useful for testing purposes.") + ;;; Generic Utilities (defun package-build--message (format-string &rest args) @@ -943,10 +946,11 @@ are subsequently dumped." (message "Fetcher: %s" fetcher) (message "Source: %s\n" url))) (funcall package-build-fetch-function rcp) - (package-build--select-version rcp) - (package-build--package rcp) - (when dump-archive-contents - (package-build-dump-archive-contents)) + (unless package-build--inhibit-build + (package-build--select-version rcp) + (package-build--package rcp) + (when dump-archive-contents + (package-build-dump-archive-contents))) (message "Built %s in %.3fs, finished at %s" name (float-time (time-since start-time)) (format-time-string "%FT%T%z" nil t))))