~ruther/guix-local

6cf105ebeeb8bd33868f02476025f4624d0aeb90 — Romain GARBAGE 1 year, 1 month ago 391b943
profiles: Rename default-properties function and expose it.

* guix/profiles.scm: Expose default-package-properties.
(default-package-properties, package->manifest-entry):
Rename default-properties.

Signed-off-by: Ludovic Courtès <ludo@gnu.org>
1 files changed, 3 insertions(+), 2 deletions(-)

M guix/profiles.scm
M guix/profiles.scm => guix/profiles.scm +3 -2
@@ 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