guix_mirror_bot pushed a commit to branch javascript-team in repository guix.
commit 2967baf8ba9dec7d0ce68d484af5c5a9b0a17246 Author: Nicolas Graves <[email protected]> AuthorDate: Wed Jun 24 21:44:11 2026 +0200 guix: json-utils: Deprecate with-atomic-json-file-replacement. * guix/build/json-utils.scm (with-atomic-json-file-replacement*): New variable. (with-atomic-json-file-replacement): Define with with-atomic-json-file-replacement* and deprecate. Change-Id: I3646ef0b20fd9d53c10f94b82f741ce9f8e6d474 Signed-off-by: Jelle Licht <[email protected]> --- guix/build/json-utils.scm | 15 +++++++++++++-- 1 file changed, 13 insertions(+), 2 deletions(-) diff --git a/guix/build/json-utils.scm b/guix/build/json-utils.scm index ad31dcb8da..1a5cba54ab 100644 --- a/guix/build/json-utils.scm +++ b/guix/build/json-utils.scm @@ -47,8 +47,8 @@ ;;; JSON modification procedures ;;; -(define* (with-atomic-json-file-replacement proc - #:optional (file "package.json")) +;; This is the function we eventually want to migrate to. +(define (with-atomic-json-file-replacement* file proc) "Like 'with-atomic-file-replacement', but PROC is called with a single argument---the result of parsing FILE's contents as JSON---and should produce a value to be written as JSON to the replacement FILE." @@ -56,6 +56,17 @@ a value to be written as JSON to the replacement FILE." (lambda (in out) (scm->json (proc (json->scm in #:ordered #t)) out #:pretty #t)))) +;; This is a deprecated version of the function that ought to be +;; removed in favor of with-atomic-json-file-replacement*'s content eventually. +;; On removal, also remove the (guix deprecation) modules and their closures +;; from node-build-system imported-modules. +(define* (with-atomic-json-file-replacement proc + #:optional (file "package.json")) + (with-atomic-json-file-replacement* file proc)) + +(define-deprecated/public-alias with-atomic-json-file-replacement + with-atomic-json-file-replacement*) + ;; This is the function we eventually want to migrate to. (define* (modify-json* file #:rest modifications) "Modify JSON FILE with successive callbacks."
