From 6cf105ebeeb8bd33868f02476025f4624d0aeb90 Mon Sep 17 00:00:00 2001 From: Romain GARBAGE Date: Tue, 24 Jun 2025 12:02:05 +0200 Subject: [PATCH] profiles: Rename default-properties function and expose it. MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit * guix/profiles.scm: Expose default-package-properties. (default-package-properties, package->manifest-entry): Rename default-properties. Signed-off-by: Ludovic Courtès --- guix/profiles.scm | 5 +++-- 1 file changed, 3 insertions(+), 2 deletions(-) diff --git a/guix/profiles.scm b/guix/profiles.scm index 264396401ef..208901e484a 100644 --- a/guix/profiles.scm +++ b/guix/profiles.scm @@ -133,6 +133,7 @@ profile-derivation profile-search-paths load-profile + default-package-properties profile profile? @@ -371,7 +372,7 @@ file name." #t lst))) -(define (default-properties package) +(define (default-package-properties package) "Return the default properties of a manifest entry for PACKAGE." ;; Preserve transformation options by default. (match (assq-ref (package-properties package) 'transformations) @@ -380,7 +381,7 @@ file name." (define* (package->manifest-entry package #:optional (output "out") #:key (parent (delay #f)) - (properties (default-properties package))) + (properties (default-package-properties package))) "Return a manifest entry for the OUTPUT of package PACKAGE." ;; For each dependency, keep a promise pointing to its "parent" entry. (letrec* ((deps (map (match-lambda