From c90da4fa6854d20abf0df941c887e784edbcefce Mon Sep 17 00:00:00 2001 From: Rutherther Date: Sun, 15 Sep 2024 16:01:33 +0200 Subject: [PATCH] feat: add recursive python dep replacing --- ruther/packages/python-next.scm | 10 +++++++++- 1 file changed, 9 insertions(+), 1 deletion(-) diff --git a/ruther/packages/python-next.scm b/ruther/packages/python-next.scm index 73147b5..6f6cd9d 100644 --- a/ruther/packages/python-next.scm +++ b/ruther/packages/python-next.scm @@ -28,7 +28,8 @@ #:use-module (gnu packages python-build) #:use-module (gnu packages python-xyz) - #:export (replace-python-deps)) + #:export (replace-python-deps + replace-python-deps/recursively)) (define with-python-3.12-raw (package-input-rewriting `((,python . ,python-3.12)))) @@ -196,6 +197,13 @@ pre-defined variants." (package-mapping rewrite cut? #:deep? deep?)) +(define* (replace-python-deps/recursively deps #:key (deep? #t)) + (if (nil? deps) + identity + (lambda (pkgs) + ((replace-python-deps (list (car deps))) + ((replace-python-deps/recursively (cdr deps)) pkgs))))) + (define with-explicit-python-3.12-single (package-with-explicit-python python-3.12-toolchain "python-" "python-3.12-")) -- 2.48.1